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MAINDEC-11-DZDARA-A BUS WINDOW LOGIC TEST PAGE 3 
DESCRIPTION 
! PSSTRACT 
THIS PROGRAM TESTS THE LOGIC IN THE DALI-F BUS WINDOW. IT 
FIR THE REGISTERS FOR WRITABILITY, THE cross 
AFPOR BITS, AND RELOCATION REGISTERS... THERE ARE TWO 
DISTINCT SECTIONS. THE FIRST IS 9 1 BUS TEST WHICH HAS BOTH 
HE WINDOW TIED INTO 1 BUS. THE SECOND IS THE 
BUS TEST WHICH USES ING TO TEST ALL THE REGISTERS. 
THIS fi39 cHECKe THE WINDOW SIZE AND DOES TRANSFERS THROUGH 
THE ONE BUS TEST IS PROVIDED FOR CONVENIENCE IN TROUBLE 
SHOOTING THE DALI-F MODULES. IT ISN USED IN THE NORMAL 
OPERATION OR MAINTENANCE OF A DUAL P RocessOR SYSTEM. BEFORE 
USING THE ONE BUS TEST REMOVE THE FOLLOWING WIRES FROM THE 
DAII-F WIRED ASSEMBLY BACKPL 
BUS A ACLOL: BOIF1 TO BOF 
BUS A DCLOL: B01F2 TO BO4Fe 
. AFTER TROUBLESHOOTING AN REPAIRING THE MODULES, REPLACE 80TH 
. OF THESE WIRES BEFORE CONNECTING THE DALI-F INTO THE NORMAL 
> DUAL PROCESSOR CONFIGURATION. 
2. REQUIREMENTS 
2.1 EQUIPMENT 
ONE BUS TEST - ANY PDP-11 WITH 4K 
TWO BUS TEST - ANY TWO PDP-11'S WITH 4K EACH 
2.2 STORAGE 
PROGRAM STORAGE - THE ROUTINES USE MEMORY O - 17776 
2.3 PRELIMINARY PROGRAMS 
THE BASIC PROCESSOR TESTS. 
3. LOADING PROCEDURE: SEE 4.3 
4, STARTING PROCEDURE 


THERE ARE TWO WAYS OF STARTING THE PROGRAM. FIRST OF ALL 
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THE PROGRAM CAN BE LOADED INTS ESCH PROCESSOR SY USING THE 
6 ABS LOADER THE PROGRAMS CAN THEN BSE STARTED AT THE STARTING 
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MAINDEC-11-DZDAA-A BUS WINDOW LOGIC TEST PAGE 4 
DESCRIPTION 


4.1 


4.2 


4.3 


S. 





tor te ae IN SECTION 4.2 . THE OTHER OPTION IS TO 
ch 3 ‘ms id i oT PROCESSOR, BING ree ie Ae OADER AND 


on SHE OTHER 
proces on AS DESCRIBED IN eR 4, iv OnSe tars METHOD 

sek A Pes el BED IN Se i MUST HA aig OF AT LEAST 
de AND re WINDOW CANNOT BE LOCATED AT MER aR ABOVE. 


CONTROL SWITCH SETTINGS 
SEE S.1.1 (ALL DOWN FOR WORST CASE TESTING) 


STARTING ADDRESSES 
SA 200 €=«©TWO BUS TEST 
ONE 


SA 204 ne TEST 

SA 210 POWER FAIL TEST - HOST - FIRST TO GO_DOWN 

SA 214 POWER FAIL TEST - NON HOST - SECOND TO GO DOWN 

SA 220 = POWER FAIL TEST - NEITHER HOST - FIRST TO GO DOWN 
SA 2e4 POWER FAIL TEST - NEITHER HOST - SECOND TO GO DOWN 
SA 510 mamas O - 17476 TO OTHER MACHINE (IF > 4K 


PROGRAM AND/OR OPERATOR ACTION 


1) LOAD THE ABS LOADER IF NOT IN MEMORY 
2) LOAD PROGRAM WITH ABS 
3) LOAD OTHER PROCESSOR IF _ TWO PROCESSOR TEST. 

A) amb 3 ms IS NOT WORKING, USE ABS LOADER ON OTHER 


B) IF THE WINDOW IS UP: 
LOAD ADDRESS 510 


LL 

2) STAR 

3) LOAD ADDRESS #500 IN OTHER PROCESSOR. 
“ (# = STARTING ADDRESS OF THE WINDOW) 
5) 


BOTH PROCESSORS WILL SELF START IF SWITCH 7 IS 
CLEAR. tte HOST WILL DELAY FOR ABOUT 30 SECONDS 

6) THE DISPLAY ON THE 11/45 WILL SHOU THE ITERATION 
COUNT IN THE LEFT BYTE AND TEST RINT 
RIGHT. TO USE, SET THE DATA BISPLAY SWITCH TO 
THE DISPLAY POSITION. 


OPERATING PROCEDURE 
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DESCRIPTION 
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OPERATIONAL SWITCH SETTINGS 


AT SA 200 .. ALL SWITCHES DOWN IS WORST CASE TESTING FOR 
ie. 2 BUS TEST. THE BELL WILL RING UPON COMPLETION OF A 


SWITCH SETTINGS ARE: 


SWi1S) = 1 ..... HALT ON ERROR 
SWc14) = 1..... LOOP ON TEST 
SWC13> = 1 ..... INHIBIT PRINTOUT 
SW<10) = 1 ..... BELL ON ERROR 
D seces BELL ON PASS COMPLETE 
SWi08> =1..... TYPE THE TEST NUMBER BEING EXECUTED 
SW<O7) = 1 ..... IF SET, PREVENTS THE PROGRAM FROM SELF 


STARTING Wk WHEN THE PROGRAM IS LOADED THROUGH 


SUBROUTINE ABSTRACTS 
SCOPE 
THIS SUBROUTINE CALL IS PLACED BETWEEN EACH SUSTEST IN THE 


INSTRUCTION SECTION. IT RECORDS THE STARTING ADDRESS OF 
Cy Re IT 12 BEING pts i LOCATION “LAD". IF A 


ON. F SUBTESTS. THE 

CONTENTS OF LAD MAY BE USED TO DETERMINE The LAST SUBTEST 
SUCCESSFULLY COMPLETED. 
HLT 
THIS ROUTINE PRINTS OUT AN ERROR ase (SEE 6.1). 10 
INHIBIT TYPEOUTS, PUT SW<13> ON A 1 
TRAPCATCHER 
Q*.42" = on et IS REPEATED FROM 4 - 776 TO CATCH 


ANY UNEXPEC - THUS ANY UNEXPECTED TRAPS OR 
INTERUPTS WILL HALT AT THE VECTOR + 2. 


ERRORS 


ERROR PRINTOUT 
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MAINDEC-11-DZDAA-A BUS WINDOW LOGIC TEST PAGE 6 
ADR RO RI 
WHERE : 
ADR = ADDRESS OF ERROR HLT 
RI = GOOD DATA (OPTIONAL) 


ERROR RECOVERY 
ONE BUS TEST - RESTART AT 204 
TWO BUS TEST - RESTART AT 200 


RESTRICTIONS 
WHEN RUNNING THE ONE BUS TEST, THE “BY SIDE OF THE WINDOW 
MUST HAVE ITS CSR REGISTER ADDRESS EXACTLY 20 GREATER THAN 
THE “A” SIDE CSR REGISTER. IF "A" SIDE CSR ADDRESS EQUALS 
764000, THEN “B” SIDE CSR ADDRESS MUST BE 764020. 

THE ONE BUS TEST IS PROVIDED FOR CONVENIENCE IN TROUBLE 
SHOOTING THE DALI-F MODULES. IT IS NOT USED IN THE NORMAL 
OPERATION OR NAINTENANCE OF A DUAL PROCESSOR SYSTEM. BEFORE 
USING THE ONE BUS T REMOVE. THE FOLLOWING WIRES FROM THE 
DALI-F WIRED SCERBLY F BACKPLANE 

BUS A ACLO L: BOIF1 TO BOYFI 

BUS A DCLO L: BO1F2 TO BOuFe 
BF TER TROUBLESHOOTING AND REPAIRING THE MODULES, REPLACE 
BOTH OF THESE WIRES BEFORE CONNECTING THE DAl1-F INTO THE 
NORMAL DUAL PROCESSOR CONFIGURATION. 


MISCELLANEOUS 


EXECUTION TIME 
A BELL WILL RING WITHIN 1 MINUTE WITH ALL SWITCHES DOWN IN 
THE 2 BUS TEST. 

STACK POINTER 

STACK IS INITALLY SET TO S00 
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MAINDEC-11-DZ2DAA-A BUS WINDOW LOGIC TEST PAGE 7 
DESCRIPTION 


8.3 


POWER FAIL 
THERE ARE SPECIAL ENTRY POINTS FOR POWER FAIL: 


SA = 210 HOST COMPUTER - FIRST TO POWER DOWN AND UP 
SA = 214 OTHER COMPUTER IS HOST - SECOND TO POWER DOWN AND 


UP 
= = 220 NEITHER COMPUTER IS HOST - FIRST TO POWER DOWN AND 
a NEITHER COMPUTER IS HOST - SECOND TO POWER DOWN 


TO TEST POWER FAIL, START EACH MACHINE AT ITS APPROPRIATE 
$s ABOVE). THEN TURN THE FIRST MACHINE OFF AND BACK 


ADDRESS (SEE 
ON. THEN TURN COND MACHINE OFF AND BACK ON. BREN 
FINISHED BOTH, fC TRcttineee HALT. IF NEITHER MACHINE IS 
OST, POWER DOEN AND UP QUIRED; I.E., POWER 
et WINDOW POWER SUPPLY. HOST fS THE SOURCE OF 
POWER FOR HE Bus WINDOW. 
PROGRAM DESCRIPTION 
THIS PROGRAM IS A TEST 
1 UNIBUS TIED INTO BOTH SIDES 
SSES AND TRAP VEC 


aah 
- 
# 
. 
oad 


THE PROGRAM S 
HANDSHAKING TO CHECK u THe REGISTERS. HIS ne SECTION ale 

CTED BEPENDING UPON WHO GETS THE BUS FR AND THEY 
SUITCH EVERY PASS. IN THIS TEST THROUGH THE 


TRANSFERS 
WINDOW ARE TRIED INCLUDING A SECTION WHICH EXECUTES CODE IN 
THE OTHER PROCESSOR’S MEMORY. 


TEST PROVIDED FOR CONVENIENCE IN 
ae eee Tee ORF MODULES. IT IS NOT USED IN THE 
ION OR MAINTENANCE OF A DUAL PROCESSOR SYSTEM. 
BEFORE THE ONE BUS TEST REMOVE THE FOLLOWING WIRES 
FROM THE UPANG WIRED ASSEMBLY BACKPLANE 
BUS A ACLO L: BOIF1 TO BOYF 
BUS A DCLOL: B01F2 TO BOuFe 


AFTER TROUBLESHOOT A! AND REPAIRING THE MODULES, REPLACE 
BO RES BEFORE Sng NG THE DALI-F INTO THE 


_, NORMAL DUAL PROCESSOR CONFIGURATION 
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DZDAAA.F11 


370 TITLE. MAINDEC-11-DZDAA-A BUS WINDOW STATIC TEST 
371 ;COPYRIGHT 1972, DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 
372 ;PROGRAM BY BOB’ BRAIN 

373 

374 

375 ; SWITCH USE 

377 100000 fwiS= 100000 ;HALT ON ERROR 

37 040000 SWi4= 40000 :LOOP_ON TEST 

379 g20000 SWi3= 20000 ;INHIBIT ERROR TYPEOUTS 

380 010000 SWi2= 10000 

381 904000 SWil= 4000 {INHIBIT ITERATIONS 

382 002000 SWi0= 2000 :0 - BELL ON FASS COMPLETE 
383 ;1 - BELL ON ERROR 

384 SW9= 1000 ; 

385 900400 Sw8= 400 

386 ooo200 SWw7= 200 sHALT ON TRANSFER COMPLETE 
388 

389 ; BIT WCSRA WCSRB 

390 ; --- wem-= wee 

391 | 

392 ; 15 A ERRO B ERROR 

393 ; 14 B TIME OUT A TIME OUT 
394 13 B ACLO A ACLO 

335 } 12 B NEW DATA A NEW DATA 
3% ; 11 B DATA 3 A DATA 3 

397 ; 10 B DATA 2 A DATA 2 

398 ; 3 B DATA A DATA 1 

399 g A TRANS ENABLE B TRANS ENABLE 
400 7 B TRANS E A TRANS 

401 5 A IVE B IVE 

402 S A DATA 3 B DATA 3 

403 q A DATA 2 B DATA 2 

404 ; 3 A DATA I B DATA I 

4OS 2 8 WRITE ENABLE A WRITE ENABLE 
406 I A WRITE ENABLE B WRITE ENABLE 
407 0 A NeW DATA 8 NEW DATA 
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DZDAAA.P11 
408 
40 
41 
411 
4le 
413 
414 
415 
417 
418 
419 
420 
421 
422 
423 
424 
425 
426 
427 000091 
428 1044 
429 104000 
430 000 
431 177776 
432 177570 
433 177570 
434 000097 
435 000000 
436 000001 
437 000002 
438 000003 
439 00 
440 000005 
44) 0000 
442 00000 
443 000097 
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;LOADING PROCEDURE: 

31) LOAD THE ABS LOADER IF NOT IN MEMORY 
2) LOAD PROGRAM WITH ABS LOADER 

33) LOAD ADDRESS 510 


s 
34) 
5p} CRD ADDRESS *500 IN OTHER MACHINE (* = WINDOW ADDRESS) 


; TYPEOUTS: 

ADR RO Ri 

;ADR ADDRESS OF ERROR 

?R1 “GOOD DATA IF ANY (OPTIONAL) 


SCOPE= TRAP 
HLT= MT 
TYPE= IOT 
PS= 776 
SWR= 177570 
DISPLAY=SWR 
BELL= 

RO= 

Rl= “1 

Re= “2 

R3= %3 

R4= %4 

RS= 45 
TT¥z “5 

SP= 4b 

PC= 47 
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000000 
000200 
000137 
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SETUP AND EQUATS 


017440 


000516 


017500 
000200 
c00240 
003410 
164000 


000010 
000604 


000020 


000001 
000030 


000022 


000010 


177570 


016720 


000004 


GETCOR: 


1$: 


REGSCN: 


6S: 
Ss: 


CODE1: 


a#BEGIN 
@sONEBUS 


a#G0.NE2 
GETCOR 


dsOPEN 
PC,R1 


+ aati »R1. 


(1)+,(O0)+ 
#17500, RO 


1$ 
#SW7, J#SWR 
+4 


#NOP. BR. 
J#BEGIN 


#164000, RO 
»Re 


#8. 
HSS, ae4 
(0) 


pC 
(E+ (6)+ 
#20, RO 


6$ 
REGSCN 


#1,%1 
%1, CHKADR 
CHKADR 

% 


p 
CHKADR, “0 
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; TRAP CATCHER FROM 0 - 776 


;JUMP_TO BEG 
:START ADDRE 
POWER FAIL 
; POWER a 
;POWER FAIL 


NING ADDRESS OF PROGRAM 
S cn ONE BLS 


NON HOST 
NEITHER HOST - FIRST 
NEITHER HOST - SECOND 


I 
S 
;MOVES POGRAM INTO OTHER MACHINE 
:OPEN WINDOW AND WAIT 


;GET WINDOW ADDRESS 
; CLEAR THE WORLD 


OCATE 
SETUP FOR TRANSFER 
sGET IT 
sew? 
NO = LOOP 
5 CHECK FOR HALT ON LOAD COMPLETE 
: CONTINUE 
sWATT FOR CONTINUE 
MAKE IT EXECUTE A JMP d#BEGIN 
START THE TEST 
;SET a FOR SCANNING 


>SET COUN 

SET FOR TIMEOUT 
1S IT THERE? 
OrEAR STACK 

; ADDRESS 

*DEC COUNT 

“LOOP UNTIL FOUND 

>TRY IT AGAIN 

sEXECUTE FROM OTHER SIDE 
sLOAD @ BIT FOR SHIFTING 
*LOAD THE ADDRESS 

*CLEAR THE C BIT 

*ROTATE IT 

*GET GOOD DATA 

“SKIP IF MORE 

> RETURN 79 OTHER SID= 
*GET FOR TYPING 

* CHECK FOR BIT 


;SKIP_IF OK 
ROTATE FAILED 
;LOOP 
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DZDAAA.P11 SETUP AND EQUATS 


500 occ74o 900000 CHKADR: 0 ;ADORESS OF SIT 
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ECTION * = 204 


#500, SP 
pc, SETUP 
#340, d8Ps 


, 
° 
’ 
° 
s 


;LH = ITERATION COUNT ;RH = TEST NO. 
R COUNT 
;¢ WORD PASS COUN 


T 
LOOP ADDRESS FOR SCOPE 


:CAST HLT INSTRUCTION ADD. EXECUTED 
-SET SP senna SOD eases 


SETUP THE VECTORS, ETC. 
SET PRIO=7 


5 LEXEEAERKESELALA LLL SESSELALELELEL EARELAERLRLLE LA LE AA LE LARS EELLELELLEESRELLEE 


ECK R/W OF WCSRA 


@WCSRA,RO 
#0, RO 
+4 


#573, aWCSRA 
aWoSRA, RO 
S73! ClivRo 


#452, QWCSRA 
aWCSRA, RO 
ibe! Of1,RO 


“$121, QWCSRA 


aWCSRA, RO 
#1¢1!0! 1,R0 


aWCSRA 
aWCSRA, RO 
#0'1,RO0 





LELEEFRELFTELELEELELELEELERELLE FELELEL FLL ELELELLELELEF 


;CLEAR THE WORLD 
GET THE DATA 
sCHECK WCSRA FOR O ON RESET 


SKIP IF OK 
WCSRA DID NOT RESET TO 0 


;SET THE SETABLE BITS 

sGET THE RESULT 

:CHECK FOR PROPER BITS 

:SKIP IF OK 

WCSRA NOT 573!0 

;SET THE SETABLE BITS 

GET THE RESULT 

:CHECK FOR PROPER BITS 

sSKIP IF OK 

:WCSRA NOT 452!0 

SET THE SETABLE BITS 

; CHECK FOR PROPER BITS 

:WCSRA NOT 12110 

:CLEAR ALL SETABLE BITS 

>CHECK FOR PROPER BITS 
KIP IF OK 


tACSRA NOT O 
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CHECK R’W OF WCSRB 


$ LERELLHLEEREREEREELRASREARA RELA EERE ARLES EERE EASELS RES LER ESS FELFELELELFLEE 


; TEST 2 CHECK R/W OF WCSRB 
OO ngage cee aria ie ganna eek ai 


RESET :CLEAR THE WORLD 
013662 MOV JWCSRB, RO :GET T 
090000 CHP #0, R0 :CHECK WCSRB FOR 0 ON RESET 
BEO +4 “SKIP IF OK 
HLT :WCSRB DID NOT RESET TO 0 
000573 O13644 MOV 8573, QWCSRB :SET THE SETABLE BITS 
013640 MOV SWCSRB, RO *GET THE RESULT 
009573 CMP #573!0!1,R0 ‘CHECK FOR PROPER BITS 
BE +4 :SKIP IF OK 
HLT :WCSRB NOT $73!0 
posse 013622 MOV 8452, JWCSRB ;SET THE SETABLE BITS 
513616 MOV WCSRB :GE SULT 
oco4s3 CMP #452!0!1.R0 “CHECK FOR PROPER BITS 
BEQ +4 sSKIP I 
HLT :WCSRB NOT 4S2!0 
090121 013600 MOV $121, aWCSRB ;SET THE SETABLE SITS 
013574 MOV SWCSRE, RO GET THE RESULT 
000121 CMP #121'0!1,R0 *CHECK FOR PROPER BITS 
BEO +4 :SKIP IF OK 
HLT *WCSRB NOT 121!0 
012560 CLR SWCSRB sCLEAR ALL SETABLE BITS’ 
012554 MOV aWCSRB, RO : HE 
006091 CMP #0'1,R0 *CHECK FOR PROPER BITS 
BEG +4 “SKIP IF OK 
HLT :WCSRB NOT O 


ee eee ee 


we a a a a 
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z 
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uy 
HS 


uuu 
REG 


Bee 


rGRH SERRE ORES 


6-26 b= bbe 
iN£Wtreo 


en 
BEER 8 


Sao GR 


CIGIG 
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013472 


013450 


013426 


~~ MACY11 27732) 


CO 
RESE | 

MOV JWDBRA, RO 
CMP #0,R0 

BEQ 44 

HLT 

MOV #-1, OWOBRA 
MOV OWDBRA, RO 
CMP #-1'0,R0 

BEQ +4 

HLT 

MOV #125252, JWDBRA 
MOV OWOBRA, RO 
CMP slesese!0, RO 
BEG 

HLT 

MOV #52525, JWDBRA 
MOV 

CMP #52525!0, RO 
BEQ +4 

HLT 

CLR QWDBRA 

MOV BWOBRA, RO 

CMP #0, RO 

BEG +4 

HLT 


05-0CT-76 
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peptone apps peeieieienaresentes FEFELEFLELELES 


R/W OF WOBRA 
aaa °°" aimee aaa apmaas mata ascatns,  sinereaccmer ati 
3: PE 


;SET THE SETABLE BITS 
GET THE RESULT 

s CHECK EOR FOR PROPER BITS 
 BBRA NOT 125252!0 


;SET THE SETABLE BITS 
;GET THE RESULT 

:CHECK FOR on BITS 
;SKIP_ IF OK 

;WOBRA NOT S2525!0 


eR or MOLE BITS 
s CHEEK FOR PROPER BITS 
:WOBRA NOT O 
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DZDARA TST4 CHECK R/W OF WOBREX 


616 ee eee ae ae ma ee er 
617 TEST 4 CHECK R/W OF W 

618 1h, ER |, RS ae a 
e13 001434 104400 tST4: SCOPE 

62! 601436 o00005 RESET sCLEAR THE WORLD 

S22 OO144O 917700 013410 MOV QWOBRBX, RO :GET THE DATA } 

S23 OO1444 022700 000000 CMP #0, RO *CHECK WOBRBX FOR O ON RESET 
624 O014SO 001401 BEQ +4 SKIP IF OK 

bes 1452 104000 HLT ; WOBREX DID NOT RESET T0 0 
627 OO14S4 012777 177777 913372 MOV #-1 , QNDERBX SET THE SETABLE BITS 

628 001462 017700 013366 MOV SuDBREX RO ;GET T RESULT 

629 O01466 022700 177777 CMP #-1'0,R0 i CHECK EOR FOR PROPER BITS 

630 001472 00140) BEQ +4 

bs 1474 104000 HLT ord Not -1!0 

633 001476 012777 125252 013350 MOV #125252, IWDBRBX ;SET THE SETASLE BITS 

634 OO1SO4 017700 913344 MOV OWDBRBX; RO GET THE RESULT 

635 001510 125252 CMP iesese! 0,RO § :CHECK FOR PROPER BITS 

62% 001514 001401 BEQ *SKIP IF OK 

bz 001516 104000 HLT *WOBRBX NOT 125252!0 

639 O01520 012777 052525 013326 MOV #52525, IWDBRBX ;SET THE SETABLE BITS 

640 001525 017.60 Ol33e2 MOV RO ‘GET THE RESULT 

641 001532 CMP #52525!0, RO :CHECK FOR PROPER BITS 

642 001536 001401 BEQ +4 SKIP IF OK 

B43 001540 104000 HLT WOBRBX NOT S2525!0 

645 001542 005077 013306 CLR SWDBRBX sCLEAR ALL SETABLE SITS 

64% O01546 017700 013302 MOV SWDBRBX , RO GET THE RESULT 

647 9015S2 022700 od0000 CMP #0, RO ; CHECK FOR PROPER BITS 

648 OO1SSE O0!401 BEG +4 P IF OK 

649 001560 194009 HLT aReY NOT 9 





MAT 


if 


RA Ra aaa doar ia 
B8888 S8B88 SSS8B8 Sssss ss 


Op be be a ps bs fe hae pee Se eed ee ee bo Re 


Sessa REELS F 





C-11-DZDAA-A 
Pil 


1 


S88 g 
B Base & 


£o 


a Bes 


BAY REE 


s 
AT] 


TSTS 


001401 


3S 8s 


ss 


os 


BUS WINDOW STATIC TEST MACY11 27(732) 


CHECK WOBRA TO WOBRAX CROSS COMMUNICATION 


1a eat et OS ge egg Lg hr 1 plaice 
:TES A TO WOBRAX CROSS COMMUNICATION 
janeeategnesyeensseaneannenstesnseuneestenntesteasteass#oie 404406048604 


SCOPE 
RESET 
013264 MOV 
000000 CMP 
BEQ 
HLT 
177777 013216 MOV 
013242 MOV 
177777 CMP 
BEG 
HLT 
igSeSe 013174 MOV 
013220 MOV 
125252 CMP 
BEQ 
HLT 
OS2eS2S 013152 MOV 
013176 MOV 
0S2S2S CMP 
BEQ 
HLT 
013132 CLR 
013156 MOV 
000000 CMP 
BEG 
HLT 





JWDBRAX, RO 
#0,R0 


#125252, aWDBRA 
JWDBRAX, RO 
#lesese!0, RO 


#52525, QWDBRA 
#52525!0, RO 
+4 


@WDBRA 
i 


“ 
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;SKIP I 
;WDOBRAX NOT 0 





sCLEAR THE WORLD 

GET THE DATA 

set ck een FOR O ON RESET 
*WDBRAX DID NOT RESET TO 0 
;SET THE SETABLE BITS 
GET THE 

*CHECK FOR PROPER BITS 
*SKIP IF OK 

:WDOBRAX NOT -1!0 

;SET THE SETABLE BITS 

> GE SULT 

“CHECK FOR PROPER BITS 
*SKIP IF OK 

*WOBRAX NOT 125252!0 
;SET THE SETABLE BITS 
3GE RESULT 

;CHECK FOR PROPER BITS 
sSKIP IF OK 

sWOBRAX NOT S2S525!0 
sCLEAR ALL SETABLE BITS 
sGET THE RESULT 

sCHECK FOR PROPER BITS 





a en i a 















BEERRECPLEOA>PPT8, — EHECKTLBBRBR FO ook® cross CbnRUNERHION > TOMS PAGE 0 


Pee TEST & CHECK WOBREX TO WOBRB CROSS COMMUNICATION 
bss 001710 1ow4on “ar +patch cme 
688 
689 001712 o00005 RESET ; CLEAR THE WORLD 
680 001714 917700 013110 MOV JWOBRB, RO iGET THE DAT! 
631 1720 2700 000000 CHP #0, RO : CHECK OBR FOR O ON RESET 
633 001726 104000 HLT ; *WDOBRB DID NOT RESET TO O 
695 001730 012777 177777 013116 MOV #-1, SNDBRBX ;SET THE SETABLE BITS 
6% 001736 017700 013066 MOV JNDBRB, RO GET THE LT 
637 O017e bee7o0 o 177777 chr a-110,A0 sex COR PROPER BITS 
633 001750 104000 HLT WDBRB NOT -1!0 
701 001752 012777 125252 013074 MOV #125252, IWOBRBX ;SET THE SETABLE BITS 
702 001760 017700 013044 MOV OWDBRB, RO GET THE RESULT 
703 001764 022700 125252 CMP #125252!0,RO | ;CHECK FOR PROPER BITS 
704 001770 001401 BEQ +4 SKIP IF OK 
70s 001772 104000 HLT *WOBRB NOT 125252!0 
707 774 012777 OS2525 013052 MOV #52525, QWDBRBX ;SET THE SETABLE BITS 
708 aeenae aaa 013022 nt MOV JWDBRB, RO :GET THE RESULT 
me Moos poi Oe Cr HGGSeSTC,RO CHECK FOR PROPER BITS 
it | H 
git 002014 icin HLT *WOBRB NOT S2S25!0 
13 002016 005077 013032 cLR SUDBRBX CLEAR ALL SETABLE BITS 
715 ee ne : rea CMP #0,R0 ’ *CHECK FOR PROPER BITS 
716 002032 O0!401 BEG +4 sSKIP IF OK 
717 602034 104000 :WDBRB NOT O 








MAINDEC-11-DZDAA-A 
DZDAAA.P11 TST6 

718 002036 016702 
719 O0e04e 005102 
720 

7el 

Zee 

723 

on 002044 104400 
7e6 O00204% 012703 
7e? O0e0Se 040203 
7e8 002054 010377 
7e3 002060 017700 
730 002064 040200 
731 002066 020300 
732 002070 001401 
Es 00207e 104000 
735 002074 012703 
736 002100 040203 
73? O0e10e 010377 
738 002106 017700 
739 OOelle 040200 
740 O02 020300 
741 002116 001401 
cay 3 0021 104000 
744 002122 012703 
745 O0ele6 o402e02 
746 902130 010377 
747 002134 017700 
748 O02 040200 
743 O0el4e 020300 
750 002144 001401 
re 002 104000 
753 002150 012703 
754 002154 040203 
755 0021 10377 
756 0021 17700 
757 002166 o40200 
758 002170 020300 
7539 O0e17e 001401 
760 0021 104000 


BUS WINDOW STATIC TEST MACY11 27(732) OS-OCT-76 10:45 PAGE el 
CHECK WOBRBX TO WOBRE CROSS COMMUNICATION 





013036 MOV SIZE,Re GET PAGE SIZE 
COM Re GET THE REVERSE 
. —f . tUZhan ian ooo Ce 
: KREASRARKAAERAARELKA LEAR ALEKS LALLA AA LASEK LE AAERKRARA LALLA RLF LS SLE LEEK EELELAEE 
tST7: SCOPE 
ooooce MOV #0.R3 GET THE DATA 
BIC R2,R3 *CLEAR THE UNUSED BITS 
012754 MOV R3; IWRARA *SET THE BITS IN WRARA 
012750 MOV JWRARA, RO GET THE DATA 
BIC R2,R “CLEAR THE JUNK 
CMP R3,RO "CHECK THE DATA 
BEQ +4 -SKIP IF 
HLT : NOT 
177777 MOV #-1,R3 GET THE DAT 
BIC R2,R3 CLEAR THE UNUSED BITS 
012726 MOV R3, INRARA SET THE BITS IN WRARA 
Ole7ee2 MOV JWRARA, RO ;GET THE DATA 
BIC Re, RO THE JUNK 
CMP R3,RO CHECK THE DATA 
BEQ +4 *SKIP IF OK 
HLT :WRARA NOT -1 
052525 MOV #52525,R3 ;GET THE DATA 
BIC R2,R3 :C THE UNUSED BITS 
012700 MOV R3, JWRARA sagt THE BITS IN WRARA 
012674 MOV BWRARA, RO THE DATA 
BIC Re, RO *CLEAR THE J 
CMP R3,RO CHECK THE aATA 
BEG +4 ; SKIP IF OK 
HLT *WRARA NOT S2S25 
125252 MOV #125252,R3 sGET THE DATA 
BIC Re, *CLEAR THE UNUSED BITS 
012652 MOV R3, IWRARA *SET THE BITS IN WRARA 
012646 MOV IWRARA, RO ;GET THE DATA 
BIC R2,RO *CLEAR THE JUNK 
CMP R3,RO *CHECK THE DATA 
BEQ +4 “SKIP IF OK 
HLT :WRARA NOT 125252 





po et ee eee 


MAINDEC-11-DZDAA-A 
DZDAAA.P11 


761 


a 
£ 


ERR tanitich Rtn b ine ARR RRR A aad 


a nn ee ee ss 


TST19 


BUS WINDOW STATIC TEST MACY11 27(732) OS-OCT-76 10:45 PAGE 22 
CHECK R/W OF WRARB 


Rea Oe cee Rae a Gee Se ee eee 
10 


; CHECK R/W OF WRARB 
SEER EERE RHEE EEE TOTES IEEE EEE 


TST10: SCOPE 


oooo00 MOV #0,R3 ;GET THE DATA 

BIC Re, R3 ;CLEAR THE UNUSED BITS 
012650 MOV R3, JWRARB SET THE BITS IN WRARS 
012644 MOV JWRARB, RO GET THE DATA 

BIC R2, RO ?CLEAR THE JUNK 

CMP R3,RO “CHECK THE DATA 

BEQ +4 : IF 0 

HLT : NOT 
177777 MOV #-1,R3 :GET THE DATA 

BIC R2,R3 :CLEAR THE UNUSED BITS 
012622 MOV R3, JWRARB “SET THE BITS IN WRARB 
012616 MOV SWRARB, RO GET THE DATA 

BIC Re, RO 

CMP R3,RO CHECK THE DATA 

BEQ +4 *SKIP IF OK 

HLT :WRARB NOT -1 
125252 MOV #125252,R3 -GET "ATA 

BIC Re, R3 CLEARS. tre UNUSED BITS 
012574 MOV R3, JWRARB *SET THE BITS IN WRARB 
012570 MOV JWRARB, RO *GET THE DATA 

BIC R2,RO CLEAR THE JUNK 

CMP R3,RO *CHECK THE DATA 

BEQ +4 : IF OK 

, HLT *WRARB NOT 125252 

052525 MOV #52525, R3 ;GET THE DATA 

BIC R2,R3 *CLEAR THE UNUSED BITS 
012546 MOV R3, JWRARB :SET THE BITS IN WRARB 
012542 MOV SWRARB, RO *GET THE DATA 

BIC i “CLEAR THE JUNK 

CMP R3,RO > CHECK THE DATA 

BEQ +4 *SKIP IF OK 

HLT *WRARB NOT S2S25 












NAINDEC-11-DZDAA-A 





DZDAAR.P11 TST11 

821 

S02 

803 

Bre 002330 10440C 

806 O02332 012777 000000 
807 002340 917700 012506 
808 O0e344 Oee700 000000 
809 002350 001401 

gio O0e3Se 104000 

Ble 002354 012777 000010 
813 O0e362 017700 O1c464 
814 002366 Oee700 001000 
815 O0e37e 001401 

Be 002374 104000 

818 002376 012777 000020 
819 O0e404 917700 dle44e 
820 002410 Oee700 002000 
821 0020414 001401 

ees 002416 104000 

824 O0e420 012777 000030 
82S O0e4e6 17700 Oleved 
2 ie ge Se 
Ese OGe449 104000 

830 O0e44e 012777 000040 
831 O02e4S0 017700 012376 
B3e 002454 Oee700 004000 
833 O02460 001401 

Hy O0e462 104000 

836 002464 012777 000050 
837 O0e47e 017700 012354 
638 002476 Oee700 005000 
839 O02e50e 001401 

840 902504 104000 


mm en a a ne a eee ee 


re 


re ree ee ee + 


012464 


01e44e2 


012420 


012376 


012384 


012332 


BUS WINDOW STATIC TEST MACY11 27(732) 
CHECK CROSS COMMUNICATION BITS BETWEEN WCSRA AND WCSRB 


Se EE ee Cees teeeaeatin tite ache nen ee 
:TEST 11 ROSS COMMUNICATION BITS BETWEEN WCSRA AND WCSRE 
Lea eebeaneayneaeaneanesnneentoniianea teenie nea neEATOa Heo NE EEO REEaREO 


tSTI1 








#0 aucsRe 
auCSR SRB, 


4 


#10, IWCSRA 
JWCSRB, RO 
#100 0,R0 


#20 SWCSRA 

WCSRB, RO 
#2000 80 
+4 


#30, JWCSRA 
aWCSRB, RO 
000,R0 


#40, AWCSRA 
Suen pO 


#50, JWCSRA 
JWCSRB, RO 
#5000, RO 
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bet O INTO WCSRA 
AVE DATA FOR TYPING 
SRA EK WCSRB FOR O 


:SKIP IF OK 
DATA IN WCSRB NOT O 


;LOAD 10 INTO WCSRA 
SAVE DATA FOR TYPING 
WCSRB FOR 1000 


; CHECK 


IP 
DATA IN WCSRB NOT 1000 


;LOAD 20 INTO 


WCSRA 


SAVE DATA FOR TYPING 
ae FOR 2000 


; CHECK WC 


; SKIP 


I 
:DATA IN WSR NOT 2000 


;LOAD 30_ INTO WCSRA 
SAVE DATA FOR TYPING 
; CHECK ey FOR 3000 


39K 
DATA IN WCSRB NOT 3000 


;LOAD 40_INTO WCSRA 


; SKIP 
;DATA IN WCSRB NOT 4000 


;LOAD SO_ INTO WCSRA 


CAVE DATA FOR TYPING 
a FOR 


; CHECK 
; SKIP 
DATA IN HCSRE NOT 5000 








POI C L-OZDAR: -A 
DZDARA TST1l 


012777 


SIS asd a os el alta eh Ss 


oo 
3 
5 


RY WINDOW 
HECK CROSS COMMUNI 


000060 


BoE 086 


000070 
012310 
007000 


000002 
Oleebb 
000004 


012310 


O1e266 


012244 


Oleeeze 


012200 


STATIC 


TEST. MA 
ERT ION 





#69, dWCSRA 


auras RO 
+4 


#70, JWCSRA 
auCSRB, RO 
ri APAa” 


#2, JWCSRA 
aWeSRB, RO 
4 RO 


74 


#400, JWCSRA 
JWCSRB, RO 

#200, RO 
+4 


#1, QWCSRA 
aWeSRB, RO 
#10000, 0 


aWCSRA 
@WCSRB 


;CLEAR THE 
;REGISTER 





B14 BETKEEN wSAA AND wcsRE "he 


+ CAE 60_ INTO WCSRA 
DATA FOR pvedN " 
‘ete K_WCSRB FOR 600 


: I 
‘DATA IN WCSRB NOT S000 


;LOAD 70_INTO or 
SAVE DATA FOR TYPING 
; CHECK ra FOR 7000 


; 9K 
DATA IN WCSRA NOT 7000 


;LOAD 2 INTO WCSRA 

SAVE DATA FOR YY tae 

; CHECK WCSRB FOR 4 
;SKIP IF OK 

DATA IN WCSRB NOT 4 


;LOAD 400 INTO WCSRA 
;SAVE DATA FOR TYPING 
CHECK WCSRB FOR 200 

;SKIP IF OK 


DATA IN WCSRB NOT 200 


sLOAD 1 INTO WCSRA 

VE DATA FOR TYPING 
CHECK WCSRB FOR 10000 
SKIP IF OK 


DATA IN WCSRB NOT 10000 











an a 
DZDARA 


PReBReS 


bes) 
@ 
“J 


Pitt iaiien i etn p paar tf 


Owwow 
tet ata 
Wr O 


000000 
012140 
000000 


000010 
012116 
001000 


o00ce0 
912074 
o0e000 


000030 
012052 
003000 


BUS WINDOW STATIC TEST MACY11 27(732) 
CHECK CROSS COMMUNICATION BITS BETWEEN WCSRB AND WCSRA 


| -ataiaiatatatg gg bgp atl dobby od RERKELELLELALARAEEEE 


CHECK CROSS COMMUNICATION BITS BETWEEN WCSRB AND WCSRA 
jE EHRELS A UEERELOEERERESE REESE DE TEHE EERIE EERE RE RITE RE REESE ERE 


Olel7e 


012150 


Oleleb 


012104 


012062 


012040 








#0, IWCSRB 
SHCSRA, RO 


a 


#10, aWCSRB 
aWCSRA, RO 
#1 900, RO 


#35, IWCSRB 
INCSRA, RO 
#3000, RO 


#40, JWCSRB 
aWCSRA, RO 
#4900 RO 


#50 QUCSRB 
ali SRA 
BO RO. 
— 
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;LOAD 0 INTO WCSRB 
SAVE DATA FOR TYPING 
:CHECK WCSRA FOR 0 


:SKIP IF OK 
DATA IN WCSRA NOT O 


;LOAD 10 INTO WCSRB 
SAVE DATA FOR TYPING 
$GHEEK WCSRA FOR 1000 
:DATA IN WCSRA NOT 1000 


;LOAD 20 INTO WCSRB 
SAVE DATA FOR TYPING 
CHECK WCSRA FOR 2000 







;SKIP IF 
DATA IN WCSRA NOT 2000 


;LOAD 30 INTO WCSRB 
;2AVE DATA FOR TYPING 
WCSRA FOR 3000 


; CHECK 
;SKIP IF OK 
;DATA IN WCSRA NOT 3000 


;LOAD 4O_INTO WCSRB 
;SAVE DATA FOR TYPING 
CHECK WCSRA FOR 4000 
SKIP IF OK 

;DATA IN WCSRA NOT 4000 


;LOAD SO_INTO WCSRB “ 
SAVE DATA FOR TYPING 

;CHECK WCSRA FOR S000 

;SKIP IF OK 
DATA IN WCSRA NOT SOOO 








oe 
i 
; 


sl mea 


DZDARA.P11 


003026 
003034 
3040 
SC44 


OWwWwWwow 
pe 
ODONWUILC 


SSRHEGSS 
B Bee 
26 3 


eae 
Bees Begs 


i 
3 


w 

3 

3 
GRO KS 


8 
8 
2 


TSTl2 


012777 


005077 
005077 


BUS WINDOW STATIC TEST MACY11 27(732) 





MOe 
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CHECK CROSS COMMUNICATION BITS BETWEEN WCSRB AND WCSRA 


000060 
011764 
00&000 


000070 
011742 
007000 


000002 
011720 
000004 


oco400 
011676 
000200 


012016 


011774 


011752 


011720 


011706 





#60, JWCSRB 
aWCSRA, RO 
#6000, RO 


#70, JWCSRB 
JWCSRA, RO 
#7000, R0 


#2, JWCSRB 
JWCSRA, RO 
#4. RO 


+4 


#400, OWCSRB 
JWCSRA, RO 
#200, RO 


#1, JWCSRB 
aWeSRA, RO 
#10000, RO 


dWCSRB 
dWCSRA 


o" 





g 


Y. 


“LOAD 60 INTO WCSRB 
‘SAVE DATA FOR TYPING 
CHECK WCSRA FOR 6000 
SKIP IF OK 

‘DATA IN WCSRA NOT 6000 
sLOAD 70_INTO MCSRB 
:SAVE DATA FOR TYPING 
sCHECK LCSRA FOR 7000 
:DATA IN WCSRA NOT 7000 
sLOAD 2 INTO WCSRB 
*SAVE DATA FOR TYPING 
sCHECK WCSRA FOR 4 
DATA IN WCSRA NOT 4 
sLOAD 400 INTO WCSRB 
SAVE DATA FOR TYPING 
CHECK WCSRA FOR 200 
SKIP IF OK 

“DATA IN WCSRA NOT 200 
;LOAD 1 INTO WCSRB 
SAVE DATA FOR TYPING 
‘CHECK WCSRA FOR 10000 
:DATA IN WCSRA NOT 10000 


;CLEAR THE 
;REGISTER 





MAINDEC-" 
OZDAARA.Pil 


347 


PERE 


Bees eePR EROS 


wo 
va) 
Ww 


'-DZDAA-A 


TST13 


104400 


BUS WINDOW STATIC TEST MACY11 27(732) 
CHECK NEW DATA INTERUPT 


177776 
003314 
003240 
000100 
000100 
000001 


000500 
011602 
010100 


910000 
011532 
000100 


000001 


oooso0 
Ot 500 
10100 


010000 
011504 
009100 


011564 


011542 


011462 


177570 
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cs... iwmaanhan 


es: 


1S: 


3$: 


d#PS 
#15, dWVECA 


#109, aWCSRB 
1, aNCSRA 


#500, SP 
JWCSRB, RO 
#19100, *RO 


#10000, QWCSRE 
aWCSRA, RO 
100,R0 
yu 
#1, JWCSRB 


sacsha, RO 
#19100, RO 


ai 
JWCSRB. RO 
100,R0 

+4 


@WCSRA 
@WCSRB 


ei0, Some 
3 


BELL 
bNEBUS 


K NEW DATA INTERUPT 
i++ 


;CLEAR PS 
:SET UP A VECTOR 
‘SET UP B VECTOR 

CLEAR A STATUS I/E 
CLEAR B STATUS IVE 

5 et NEN DATA BIT ON A 
iA SIDE SHOULD HAVE INTERUPTED 
sRESET SP 
GET B STATUS 
sek STATUS 
B STATUS IS {5 NOT 10100 

y THE BIT 


igen 
GET A STATUS 
CHECK A STATUS 


: K 
*A STATUS NOT 100 

;SET NEW DATA BIT ON B 

if SIDE _SHOULD HAVE INTERUPTED 


GET A STATUS 
Sue A STATUS 


IF_OK 
A STATUS IS IS NOT 10100 
‘CLEAR THe BIT 


;GET B STATUS 
sce ck B STATUS. 
:B STATUS NOT 100 
31/0 
:1/D 


LAST BcOPe 


B 
LOOP ON ONEBUS TEST 





334 
995 


377 


SISitet etcisten ter 


TY YT 


OOVdO0000000 
WONTUW £WwRH-O 


Sea aoe SUR RATER CRON UURE McG ere cnn ae 


z 
N 


ee ee ee eee 


003410 


OO341e 
093416 


003422 
003430 
003432 


003440 
SO3442 
COS446 


OO3S46 


MRINDEC-11-D2DAR-A 
OZORAR. Pil 


0990S 
012706 


00476? 
012737 
000240 


032777 
901402 


BUS W 
MAIN 
oS90 
7206 
0340 
010000 


00 
00 
00 
002752 
000180 


000091 
011334 
000091 
91132 


000$73 


011300 
011274 


009453 


O1leSe 
011246 


000121 


C1l2e4 
011220 


011204 


WINDOW ST 
TEST 


177776 
013364 


175324 


011340 
011326 





ATIC TEST MACY1! 27(732) 
FIRST TO GET WINDOW 


SEGIN: RESET : CLEAR THE WORLD 
MOV #S500,SP : SET SP #eeee ae SELES 
JSR PC, SETUP ; SETUP VECTORS, 
GO: MOV #340, aePS T PRIO=7 
NOP BIve IT SOME ROOM 
BIT 810000, aWCSRA s CHECK FOR NEW DATA 
SEQ 6. :SKIP IF FIRST ON THE BUS 
IMP SECOND ; START SECOND SECTION 
ov8 8100, ICNT :SET TEST 101 
¢ PERERELERLALLE SALA RAE AALS AA AASLLALELEL SEAL ESL ALALELASLSELASARALLSEELELELE 
TEST 101 CHECK R/W OF WCSRA 
S SEHLSLELLELELASEAESSAELRARSFELSSESFSRALRLSAFESRSSA SES FSEESSEEFSESSELELELFA SSF SFS4 
tST101: SCOPE 
MOV 81, NCSRA CLEAR REGISTER 
MOV aWeSRA, Re :GET THE BITS 
MOV $1. aWcSRA :SET THE NEW DATA BIT 
MOV SutSRA, RO ;GET FOR TYPING 
BIC R2,RO UNK 
TST RO CHECK FOR O BITS (1 MASKED) 
BEQ +4 ‘SKIP IF O 
HLT NEW DATA DID NOT SET 
MOV 8573,R3 :GET THE DAT 
BIC R2,R3 “CLEAR THE UNUSED BITS 
MOV R3; aWCSRA iSET THE BITS IN WCSRA 
MOV aWcsRA, :GET THE DAT 
BIC R2, RO CLEAR THE bt 
CMP R3;RO :CHECK THE DATA 
BEQ +4 *SKIP IF OK 
HLT :WCSRA NOT S73 
MOV #453,R3 :GET THE DATA 
BIC R2,R3 ?CLEAR THE UNUSED BITS 
MOV R3, AWCSRA :SET THE BITS IN WCSRA 
MOV aWeSRA, RO :GET T 
BIC Re, RO ‘CLEAR THE JUNK 
CMP R3,RO :CHECK THE DATA 
BEO 44 :SKIP IF OK 
HLT *WCSRA NOT 453° 
MOV #121.R3 :GET THE DATA 
BIC Re, Rs 5 CLEAR THE D BITS 
MOV R3; aWCSRA *SET THE BITS IN WCSRA 
MOV aWESRA, RO GET THE DATA 
BIC R2, RO CLEAR THE J 
CMP R3’RO *CHECK THE DATA 
BEQ +4 *SKIP IF OK 
HLT *WCSRA NOT 121 
CLR aWCSRA *ZERO THE REGISTER 
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SA=200 





+ 


He 


7  eeEeEeEEEE 
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DAAA.P1! TST102 CHECK R7W OF WOBRA 

1048 5 RERRAREHSESF ASSL SLSS EAA LSA REAELERERASE SAA SALTS ELALLELELAFLSLELEFLALELEFES 
1049 “TEST 102 CHECK RvW OF WOBRA 

1050 SERESREFRAAESHAEFSSELSLESESLELSASSRASSSRERESSERSRLGESEEFLSSLALSLSEFLEALFF SLE 
1081 003820 104400 tST102: SCOPE . 
1053 003622 012777 177777 O11176 MOV &-] SUOBRA :SET THE SETABLE BITS 

1054 003630 917700 011172 Mov SKOBRA ;GET THE RESULT 

105S 003634 022700 177777 CMP ei! Oo, Aye *CHECK FOR PROPER BITS 

1056 003640 001401 BEQ :SKIP IF OK 

10s? p03642 104000 HLT :WOBRA NOT -1!0 

1055 O03644 O12e777 OS2525 911154 MOV #52525,2WDBRA ;SET THE SETABLE BITS 

1066 903652 017700 011150 MOV AWOBRA, R :GET THE RESULT 

1051 003656 S22e700 os52525 CMP #52525!0, RO *CHECK FOR PROPER SITS 

1052 003662 001401 BEQ +4 *SKIP IF OK 

1063 003664 1040900 HLT ‘WOBRA NOT S2S25!0 

1065 003686 012777 125252 011132 MOV #125252, 9WDBRA ;SET THE SETABLE SITS 

1085 003674 017700 11126 MOV JWDBRA, RO GET THE RESULT 

1067 003700 Oe2700 125252 CMP eleseSe!0, RO  ;CHECK FOR PROPER BITS 

1068 902704 OO1401 BEQ :SKIP IF OK 

1085 1 HLT *WOBRA NOT 12=2S2!'0 

1071 003710 Ollie CLR 3UDBRA ;CLEAR ALL SETABLE BITS 

1072 003714 017700 O11156 MOV JKMDBRA, RO -GET THE 

1073 vialelsiers CMP #0, RO :CHECK FOR PROPER BITS 

1074 001401 BEO +4 :SKIP IF OK 

1075 003726 194900 HLT :WOBRA NOT 9 





















MAINDEC-11-D2DAA-A BUS WINDOW STATIC TEST MACYi1 27(732) OS-OCT-76 10:45 PAGE 320 
DZDRAR.F 11 TSTi03 CHECK R’W OF WRARA 





1076 5 RERKAEAERALS RSLS E RARE LAA ALLALARERAL LRA ALAEFLLS SAE ERE LEL ERA LL ALF LA AESSLES 
1977 TEST 103 CHECK R/W OF WRARA 
1078 g SRRELHLERAEERAAELSAREREL ELE AL AE ALE LRALAF AS LLE LLL EERE FLE LA LL AFL ERS LEE SAE 
1973 003730 104400 tST103: SCOPE 
1081 003732 oO18702 011142 MOV SIZE,Re sGET THE SIZE OF ‘THE WINDOk 
1088 003736 505102 COM Re SWITCH THE BITS 
1084 003740 012703 o00000 MOV 80,R3 :GET THE DAT 
1085 003744 040203 BIC R2,R3 :CLEAR THE UNUSED BITS 
1085 00374 010377 011062 MOV R32; JWRARA SET THE BITS IN WRARA 
1087 003752 917700 011056 , MOV JWRARA, RO :GET THE DAT 
1088 003756 o40200 Ic R2,RO CLEAR THE 
1089 003760 920290 R3,RO *CHECK THE DATA 
, 1090 003762 001401 BEQ +4 :SKIP IF OK 
1031 003764 104000 T : NO 
1083 003766 012703 177777 MOV #-1,R3 GET T A 
1 1094 003772 O40203 BIC R2,R3 *CLEAR THE UNUSED BITS 
1089S 003774 010377 011034 MOV R3, JWRARA ‘SET THE BITS IN WRARA 
109 904000 917700 611030 MOV aWRARA, RO GET THE DATA 
1087 OO4004 O40200 BIC ,RO *CLEAR THE J 
1098 040% 920300 CMP R3;RO :CHECK THE DATA 
| $1998 O04010 001401 BEQ 4 ‘SKIP IF O 
1100 Oo40l2 104000 . - 
| 1102 004014 012703 125252 MOV #125252,R3 GET THE DA 
| 1103 904020 o4d202 BIC R2,R3 SE aR THE UNUSED BITS 
| 210% 904022 010377 011006 MOV R3, IWRARA :SET THE BITS IN WRARA 
| 1105 O04026 017709 011002 MOV IWRARA, RO :GET THE DAT 
1106 004032 040200 BIC R2, RO CLEAR THE JUNK 
1107 004034 620300 CMP R2 ; CHECK THE DATA 
' 1308 004036 001401 BEG +4 OK 
1108 DO4O4O 104000 T i BRARA NOT 125252 
' 
| 4112 Q04042 012703 oOSes25 MOV #52525, R3 ;GET THE DATA 
| 2112 904046 040203 BIC R2,R3 “CLEAR THE UNUSED BITS 
' $113 004050 010377 010760 MOV R3° IWRARA “SET THE BITS IN WRARA 
' 1114 OO4054 017700 010754 MO SWRARA, RO :GET THE DATA 
| - J11S 004060 o40200 BIC R2,RO ‘CLEAR THE 
HE Bas Bang? ewe eae pe one 
| Ylie O04066 104000 HLT :WRARA NOT S2525 
| 1416 004070 005077 *CLEAR THE JUNK 


010740 CLR @WRARA 


a ne - eee 
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DZDAAA. P11 TST104 CHECK CROSS COMMUNICATION BITS 
ii? : Suna eepeenesneneneaneanennaaesneaeaaeananesaeaaeeanesasanscesnsieeateas 
iiss oo4074 1ow4oo janteatseennesunssunesnnessstensnessneninenansanensstssnnsasneaaesaneees 
1124 
1125 004076 005037 cOD005 CLR a8 :CLEAR THE STATUS WORD 
1126 004102 905037 177776 CLR aePs -SPL_O 
ig? bo106 b3e77" 010000 910710 BIT #10000, , aWCSRA sHaTT FOR NEW DATA 
He} BAUS BLCTRR BIBGES HEA GREP ™ 
1131 004126 901401 SEQ :SKIP IF OK 
1132 004130 104000 HLT :JWCSRA NOT 10000 
1134 132 012777 000001 O10664 MOV #0!1, OWCSRA ;SET 0 INTO SWCSRA 
1135 140 767 010214 JSR PC Timo *TIME THE RESPONCE ae ae 
tis? owiso pee7be b1oeed Ry ake RO TET cRR et Boggy 
1138 peat arty BEQ : SKIP IF OK. 
1139 004156 104000 HLT -@WCSRA NOT 10000 
1141 004160 012777 000011 010636 MOV #10!1,aWCSRA § ;SET 10 INTO @WCSRA 
1142 OO4166 O04767 O10166 JSR PC, TIMO :TIME THE RE E 2 
1143 OoNiZe 017700 D10626 MOV aHiESRA, RO GET QWCSRA FOR TYPING 
1144 176 011010 CMP #11010,R0 1S QWCSRA = 11010? 
1145 001401 BE +4 :SKIP IF OK 
114g 004204 104000 HLT *@WCSRA NOT 11010 
1148 012777 o00021 019610 ‘MOV 820!1,dWCSRA §;SET 20 INTO OWCSRA 
1149 004214 004767 010140 JSR PC TIHO -TIME THE RESPONCE 3 
1150 017700 010600 MOV awesRA, RO :GET JWCSRA FOR TYPING 
1151 O04 022700 012020 CMP #12029,R0 *IS QWCSRA = 12020? 
1152 004230 001401 BEG +4 *SKIP_IF OK 
1153 004 104000 HLT ;@WCSRA NOT 12020 
| 1155 004234 012777 909031 o10S62 nov #3011, QUCSRA SET % NTO DUCSRA é 
i123 Bosse aera Bt bees MOV aWeSRA, RO GET SWCERE FOR TYPING te i 
| 4158 OO42S2 022700 013030 CMP #13030;R0 IS QWCSRA = | 
1159 256 O01 BEQ +4 :SKIP IF OK 
1160 260 tits HLT *@WCSRA NOT 13030 
| 282 OO4262 012777 000041 010534 MOV #40!1,9WCSRA § ;SET 40 INTO QWC 
| 1163 004270 004767 919064 JSR PC, TIMO ‘TIME THE RESPONC 5 
| 1164 004274 017700 O1 MOV BWESRA, RO :GET JWCSRA FOR TYPING 
| 1165 004300 022700 014040 CMP #14040, RO 71S JWCSRA = 14040? 
| 166 004304 001401 BEQ SKIP IF OK 
| 1167 004306 104000 HLT *JWCSRA NOT LYO4O 
| 
| 
| 
i 
| 
| 
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DZDAAA.P TST104 CHECK CROSS COMMUNICATION BITS 
1169 004310 012777 0000S! 910506 MOV #5011 QWCSRA ss SET 52 INTO SWCSRA 
1170 004316 O04767 010036 JSR +h ‘TIME THE RESPONCE 
1171 004322 017700 010476 MOV Sitsaa. 20 ‘GET QWCSRA FOR TYPING 
1172 O04 e700 615050 CMP #15080, RO 1S QWCSRA = 15050? 
1173 004232 001401 BEQ “SKIP IF OK 
1174 004 104000 HLT :QWCSRA NOT 1S0S0 
117 004336 012777 000061 O10460 MOV #60!1,3WCSRA § ;SET 60 INTO JWCSRA 
1177 004344 004767 010010 JSR PC ih *TIME THE RESPONCE 
1178 O0435C 017700 010450 Mov  aWCSRA, RO ;GET_SWCSRA FOR TYPING 
1178 004354 022700 016060 CMP #16080, RO IS QWCSRA = 160607 
1180 004360 001401 EQ KIP IF OK 
1181 004362 104000 HLT NCSA NOT 16060 
1183 004364 012777 000071 010432 MOV #7011 QWCSRA =; SET _70 INTO @WCSRA 
1184 004372 004767 007762 JSR E1itO :TIME THE RESPONCE 
1185 004376 017700 O10422 MOV a AESRAR GET QWCSRA FOR TYPING 
1186 017070 CMP #17070, fp 1S QWCSRA = 17070? 
1187 OO4405 901401 BEQ :SKIP IF OK 
1188 O044:9 1 :QWCSRA NOT 17070 
1190 o04%412 612777 000003 010404 MOV #2! 1, JWCSRA ;SET 2 INTO aWCSRA 
1191 OO4420 004767 JSR PC Timo TIME THE RESPONCE 
1192 004424 017700 010374 MOV aWesRa, RO GET SWCSRA FOR TYPING 
1193 004430 22700 010006 CMP #10006; RO 1S @WCSRA = 10006? 
1194 004434 001401 BEQ +4 :SKIP IF 
1195 004436 1 HLT *QWCSRA NOT 10006 
1197 OO4440 012777 000401 010356 MOV #400!1, aWCSRA  ;SET 400 INTO @WCSRA 
1198 OO4446 004767 007706 ISR PCT itd >TIME THE RESPONCE 
1199 OO44S2 017700 010346 MOV SeSRA. RO GET QWCSRA FOR TYPING 
1200 oo4456 022700 010600 CMP #10600, R0 1S @WCSRA = 10600? 
1201 OO4462 OO!401 BEG +4 SKIP I 
iede OO4464 104000 HLT :@WCSRA NOT 10600 
120 DO4466 112777 000000 010330 vB aWC ;CHECK FOR BYTE ADDRESSABLE 
t 004474 017700 010324 MOV aWtSRA, RO GET aJWCSRA FOR T 
1206 O22 010800 MP 10600, R 1S aWCSRA = 106 
1207 001401 BEQ -SKIP IF OK 
leoe SO4506 T WCSRA NOT 10600 



















Pll TST10S CHECK CROSS WDBR’S WITH WINDOW CLOSED 


Se eames ree ety rt rt fear ee 
210 : TEST HECK CROSS WOBR’S WITH WINDOW CLOSED 
ell {HEHE HEHEHE EHH H EEE HHH HSUEH EAE EET 
ele 004510 104400 TST10S: SCOPE 
14 


p04S12 012777 000001 010304 MOV #1!1, QWCSRA ;SET_1 INTO QucSRA 
004520 PC Tih MO 


J 
1216 42777 177777 010274 MOV #-1 , JWOBRA iL AD - aWOB 
lel? BoNeae 12777 000001 010264 MOV aii) oe ;9ET 1 i 


C 
1219 OO4S44 017700 aia MOV aire RO 3GET_@WDBRE FOR, TYPING 


220 
leei OO04SS4 001401 BEQ +4" ‘SKIP IF OK 
leee O04SS6 104000 HLT ;QWDBRB NOT -1 


0240 MOV #0, DWDBRA ;LOAD 0 INTO JWOBRA 
004565 000001 010230 MOV #1!1, WCSRA ;SET 1 INTO aWCSRA 

lee6 004574 004767 007560 JSR PC’ TINO THE RESPON 

1227 OO4600 017700 910224 MOV BWOBRB, RO GET QWDBRB FOR TYPING 

1228 004604 Oee700 000000 CMP #0, RO *IS QWDBRB = 0? 

1229 OO4610 001401 BEQ +4 :SKIP IF OK 

1230 OO04%61e 104000 HLT :JWOBRB NOT O 


arr 
L on 
= 
m 
— 
x 
m 
Zn 
=m 
ow 
vO 
Oo 
=z 
oO 
m 
bs 


oo 

“ 

ma) 

SOx, 
. 

2» 

a] 

ay) 


i 
4 
3 


1232 O04614 012777 O52525 010204 MOV #52525, QWDBRA ;LOAD S2S25 INTO SWDBRA 

1233 O04%622 012777 000001 010174 MOV #1!1, JWCSRA ioe 1 INTO aWCSRA 

1234 004630 004767 007524 ISR PC: TIMO TIME THE RESPONCE 

1235 004634 017700 010170 MOV AWOBRB, RO GET @WDBRB FOR TYPING 

1236 OO04640 022700 O52525 CMP #52525, RO TS QWDBRB = $2525? 

1237 904644 001401 BEQ +4 SKIP IF OK 

1238 OO4646 104000 HLT : JWDBRB NOT S2525 

1240 O046S0 012777 125252 010150 MOV #125252, 3WDBRA ;LOAD 125252 INTO QWDBRA 

1241 004656 012777 000001 0O10140 MOV ui aWeSRA ioe 1 INTO aWCSRA 

le42 OO4664 004767 007470 JSR itho “TIME THE RESPONCE 

1243 004670 017700 010134 MOV SrbBRE RO GET QWDBRB FOR TYPING 

tel 004674 022700 125252 CMP wiesese, RO ?1$ @WDBRB = 125252? 
904700 O01401 BEQ -SKIP IF OK 

iSue 004702 104000 T :@WDBRB NOT 125252 
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NAINDEC-11-DZDAA-A 


TDD 


rorerutorroruranrunins 
<£ 


ERASER ER AR Ore 


Pil 


DZDARA. 
1248 
1259 
1252 004706 2 
1 004720 
017700 
dee?! 
104000 
| 
| 
i 
| 
| 
: 


TST106 


BUS WINDOW STATIC TEST MACY11 27(732) 
CHECK CROSS WOBR’S WITH WINDOW OPEN AND CLOSED 


007766 
0S2525 


010110 


010100 
010070 


010026 


010016 
010006 





HO3 
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5 RERAEAAER REE RELE ERE RAE REALE RLAL AREER RAE RALA LER E SEE RER LEAR EE RERAEELEREAES 


S WOBR’S WITH WINDOW OPEN AND CLOSED 


; 0 
HGHE HEHE GHEHEH GIES HEHEHE AE 


tST106: SCOPE 


MOV #400! 1, QWCSRA 
JSR 

MOV #52525, JWOBRA 
MOV #40011 " IWCSRA 
ISR int 

MOV tipan 

CMP nigsess, Ro 
BEQ 

HLT 

MOV @WOBRB, RO 

CMP iesese, RO 
BEQ 

HLT 

MOV #1!1, WCSRA 
JSR PC: Timo 

MOV #52525, SWDBRA 
MOV #1'1. SNCSRA 
JSR Cc. TiO 

MOV AWOBRA, RO 

CMP aseses, RO 

BEQ 

HLT 

MOV QWOBRB, RO 

CMP wsese5, RO 

BEG 

HLT 





ser oe Te oe 


oO 
m 
-_ 


SIP IF OK 
PSWDBRA NOT 125252 


;GET QWDBRB FOR TYPING 
31S QWOBRB = 125252? 
;SKIP_IF OK 

;QMDBRB NOT 125252 


iin 1_INTO @WCSRA 


LOAD S2S25 INTO a@WDBRA 
SET fy @WCSRA 


SPONCE 
{GET aWDBRA FOR TYPING 
715 aWDBRA = 52525? 
:SKIP IF OK 
SWOBRA NOT S2525 
;GET_QWDBRB FOR TYPING 
:15 SWDBRB = 52525? 


;SKIP_IF OK 
:QWOBRB NOT S2eS25 


Ww 


£= 








. EST QP CHECK ERROR CONDITIONS AND LOC RERLELAELAKELLLESLES 


;TEST 10 CHECK ERROR CONDITIONS AND LOCKOUT 
5 HR ERE EERE IEEE EER EE REE ER RRR EE HEHE EE EEE RAS EE EERE EERE EE EE 
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Ne “pit TST107 Ree ot bk OR CONDI TI SRS AND (beK Gt 
te 
Legs oosos2 104400 tST107: SCOPE 
1385 Bhenes poser povers oe Mey OBR HAO Fine at Re Spore ! 
1288 OOSO66 012737 OO0SIO4 ooo004 MOV sis aa4 *SET FOR TIMEOUT hh iots 
{Se 005074 005777 007750 TST WADRA : TRY TO GO THROUGH A CLOSED WINDOW 
1230 005109 ig4o09 HLT 10 Th WITH CLOSED WINDOW (BROKE IT) 
1292 005104 Oeb26 18: CMP tye (6)+ ‘CLEAR THE STACK 
1293 005108 017700 007712 MOV aWCSRA, RO GET JWCSRA FOR TYPING 
1294 005112 022700 110000 CMP #110006, RO IS SWCSRA = 1100007 
1295 005116 001401 BEQ :SKIP IF OK 
129% 005120 104000 HLT ‘@WCSRA NOT 110000 
1298 005122 012777 O00001 (27674 MOV #1!1, JWCSRA iSET 1_INTO QWCSRA 
1299 005130 004767 907224 ISR PCT ith MO ;TIME THE RESPONCE a 
1300 005134 012737 O0SiSoO oo0004 MOV #2 a4 *SET FOR TIMEOUT 
130} bos 142 O08r 7 007702 TST auth NOW TRY ne WiNoow 
Boa opetes fdaopn 70765 Pee GET FOR REPPED ON DATAI 
1305 005156 O22626 CMP (6)+, (6)+ ‘CLEAR THE STACK 
1308 605160 000406 ‘ BR 4§ ‘SKIP THE TEST 
1308 005162 017700 007636 “MOV IWCSRA, RO sGET QWCSRA FOR TYPING 
1309 905166 022700 010200 - CMP #19200, RC *IS aWCSRA = 10200? 
1310 005172 001401 BEQ :SKIP IF OK 
131k 005174 104000 HLT WCSRA NOT 10200 
1313 005176 012737 005212 OO0004 4s: MOV 85S, 084 ;SET FOR TIMEOUT 
1314 Oo=e04 005077 007640 cLR aiiAORA $y Ova ME ONLY TRANSFER EN SET 
1316 dos212 022626 S$: CMP (6)+, (6)+ “CLEAR THE STACK 
1318 ppesiy 017700 007604 "MOV SWCSRA, RO GET QWCSRA FOR TYPING 
| 1319 005220 ge2700 110200 CHP #110200, RO s18 QUCSRA = 110200? 
1321 Bpesee HLT ‘ ? WCSRA NOT 110200 
1323 905230 012777 000001 007566 MOV #1!1, QWCSRA ;SET 1 INTO QWCSRA 
13e¢ QOeSNe pi2737 pbSe60 oDDDOY |S ST FOR TI sao 
i 1326 ppescs 005077 pO3E58 CLR JWADRA : TRY Ted TH H ONLY WRITE ONLY SET 
13e7 005254 194000 HLT ie $010 NOT TRAP ON ONLY WRITE ONLY 
13293 ppeSeD ae 6S: CMP (6)+, (6)+ *CLEAR THE JUNK 
1330 O0S262 017700 007536 MOV AWCSRA, RO GET SWCSRA FOR TYPING 
1331 005266 022700 110004 CMP #110004, RO *I1S @WCSRA = 110004? 
1332 005272 001401 BEQ +4 *SKIP IF OK 
1333 005274 104000 HLT @WCSRA NOT 110004 
1335 005276 012777 000001 007520 MOV #1!1, QWCSRA ;SET 1 INTO QWCSRA 
13236 905304 0604767 007050 JSR PC, TEMO *TIME THE RESPONCE ae os 
| 
i 
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be bah be 
N 


RRS E29 


bas 


ST Pia i MERE RE RDER LA Aaa naa dal unit 


a re ee ee eee eee 
co 























TST107 CHECK ERROR CONDITIONS AND LOCKOUT 


012737 005324 000004 MOV 873, 084 ;SET FOR TIMEOUT 
095077 007526 CLR JWADRA ‘NOW TRY IT WITH WINDOW OFEN 
boo4Gs BR 9S ‘SKIP THE ERROR TYPEOUT 
17700 007474 73: MOV JWCSRA, RO GET FOR TYPING 
104000 HLT TRAPPED WITH WINDOW OPEN 
022626 CMP (6) +, (6)+ : CLEAR TACK 
00040 a. SR 9g SKIP THE TEST 
017700 007462 MOV JWCSRA, RO :GET SUCSRA_ FOR TYPING 
922700 010204 CMP #10204, RO 1S awcs 10204? 
001401 BEQ Pr OK 
00 HLT : SWCSRA NOT 10204 
9$: 
012777 000001 007444 MOV #1!1. dWCSRA SET 1 INTO @WCSRA 
004767 006774 JSR PC, TIMO *TIME THE RESPONCE er 
005767 007606 TST MM :1S MEMORY MANAGEMENT IN USE? 
001403 BEQ 15S : BRANCH 
12701 o2u000 HOV #020000,R1 USE KIPAR1 FOR ADDR 
016701 007574 1S$: MOV OFFSET RL ;GET THE OFFSET 
016101 015142 MOV ADR2(15,8 *SET UP THE ADDRESS 
066701 0074 ADD WADRA,R al *ADD IN WINDOW ADDRESS 
012737 OOS426 OO0004 16%: MOV #115, 084 -SET FOR TIMEOUT 
005011 CLR (1) CAUSE A DATAO 
000401 BR +4 *SKIP THE CLEAR 
022626 11S: CMP (6)+. (6)+ ‘CLEAR THE ST 
017700 007370 MOV QWCSRA, RO *GET aWCSRA FOR TYPING 
00 150204 MP #150204, RO *IS aWCSRA = 150204? 
001401 BEQ +4 -SKIP IF OK 
HLT QWCSRA NOT 150204 
016700 007354 MOV WCSRA, RO GET THE ADDRESS 
142760 O00200 000001 BICB #200, 1(0) [CLEAR BIT 1S 
017700 007342 MOV JWCSRA,R *GET @WCSRA FOR TYPING 
010204 CMP #10204; R 1S @WCSRA = 10204? 
001401 BEQ +4 *SKIP IF OK 
HLT *@WCSRA NOT 10204 
905767 007500 TST MM sMEMORY MANAGEMENT? 
14 BEQ 20S BRANCH IF NO 
016701 007474 MOV OFFSET, RI 
016101 oi5142 HOV RoRECL5 , Rd GET EXPECTED WDOARA CONTENTS 
t "3 PaO 007332 20$: SUB WADRA, RI GET RID oF THE BASE 
017700 007310 21$: MOV JWDARA, RO GET FOR TYPING 
. 0201 CMP R1,RO *CHECK WOARA FOR ERROR ADDRESS 
001401 BEQ +4 ‘SKI 
104000 ‘THE WDARA CONTAINS THE WRONG ADDRESS 
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007276 
01 


C0444 


007260 


007310 


000004 


007162 
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WOARA 


EST 110, CHECK WINDOW SIZE AND WOARA 
; 11 
GHEE EHE GEESE SEEGER Eo 


TST110: SCOPE 


4S: 


1$: 


eS: 
3$: 





CHECK WINDOW SIZE AND W 


aWRARA :SET TO BANK O 
#1!1, JWCSRA :SET 1 INTO aWCSRA 
Timo TIME THE RESPONCE — ee 
SIZE, Re 3GET THE SIZE 
Re : MAKE 
Re ;1T A 
Re ; COUNT 
#37777, SIZE TS IT 32k? 
4 ; SKIP IF NOT 
#120000, R2 FUDGE nek 32K 
825, a84 iSeT F TIMEOUT 
ube, Rl :GET roe ADDRESS OF WINDOW 
R1,R *CREATE END OF WINDOW 
ay 3D0 A DaTAO 
3$ *SKIP ERROR 
(6)+, (6)+ CLEAR THE STACK 
aWCSRA, RO *GET FOR TYPING 
#110006, RO >ERROR FLAG SET? 
*SKIP IF OK 
*NO ACCESS ERROR - BAD WONDOW SIZE? 
#100000, 3WCSRA ;CLEAR ERROR 
WADRA. Ri sWITH RESPECT TO WINDOW 
JWDARA, RO GET ADDRESS FOR TYPING 
RO, RI ADDRESS 
+4 SKIP IF OK 
+1 *ERROR ADDRESS IS WRONG 
#2,R1 GO TO NEXT 
WADRA, R1 ; MAK IT WINDOW ADDRESS AGAIN 
R1,Re FOR END 
§ COOP UNTIL DONE 
ae4 RESET 4 


#6 
#141, SWCSRA *SET 1 INTO aWCSRA 
PC, TIMO >TIME THE RESPONCE 
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CHECK WINDOW ADDRESSING CAPABILITY 


it 
006 


006720 


010330 


007074 


007124 


000004 


007000 
006772 


006746 


006732 


Est dll CHECK WINDOW ADDRESSING CAPABILITY 


HECK WINDOW ADDRESSING CAPABILITY 
Oe RO ga eee eee aa 


CLR QWRARA sSET TO BANK O 
MOV #1!1, NCSRA :SET 1 INTO aWCSRA 
JSR PC: TIMO Tine. THE RESPONCE ee er 
MOV SIZE, Re GET THE SIZE 
NEG R2 :MAKE IT A COUNT 
ASL Re 
ASL Re 
BIT #37777, SIZE s1S IT 32k? 
BNE 4§ :SKIP IF NOT 
MOV #120000, R2 ; FUDGE FOR sek 
4§: MOV #25, 084 °SET FOR TIMEOU 
MOV WADRA, R GET WINDOW COURTING ADDR 
1S: MOV (RD RA GO THRU THE WINDOW 
BR *SKIP IF ERRO 
23: CMP (6) +, (6)+ *RESTORE STACK 
3$: MOV JWCSRA, RO GET STATUS 
CMP #150204, RO *CHECK STATUS 
BEQ 39k IP IF OK 
HLT TIME OUT ERROR DID NOT OCCUR 
BIC #100000, JWCSRA CLEAR THE ERR 
MOV #1'1, JWCSRA jgeT 1 INTO aWCSRA 
JSR PC, TIMO *TIME THE RESPONCE fag hes 
ADD #2,R1 UPDATE WINDOW ADDR 
SUB #2;Re *DECREMENT SIZE COUNT 


BNE 1$ : UNTIL DO 
MOV #71!1,QWCSRA § ;SET 71 INTO aWCSRA 
JSR “TIME THE RESPONCE ie BY 
1 HHGHHE HEHEHE HHH GEG GB GHG a Ea rae 
TEST 11 CHECK NDOW READ 
© EPSESLSLELSRSK ESLER EE ERE LES RE LE REESE ESE REE SSE REE ELESEA KES L ELSE KERR ESSERE 
tsTil2: SCOPE 


MOV #1!1, aWCSRA ST 1_INTO_@WCSRA 


JSR PC tin MO sTIME THE RESPONCE es rae 

MOV A,RO WINDOW ADDRESS 

ADD HONEBOS. RO sb TH +ONEBUS 

MOV #ONEBUS; R3 *SET TO ADDRESS ONEBUS 

MOV SIZE,Re. GET WINDOW SIZE 

NEG R "MAKE IT THE LAST ADDRESS 

ASL R iE INTO 

ASL Ro POSITION 

ADD WADRA, Re sRELOGATE TO TO BEGINNING OF WINDOW 
1S: MOV (0),Ri BAD DATA 

CMP 0); (3) “CHECK THE DATA 

BEQ i SKIP IF S 

HLT $1 * WINDOW BATA NOT BANK 0 DATA 

CMP (3+, (0)+ “ADD 2 TO BOT 

CMP SDONE, RS $END OF bara?” er 


BEQ ES - GET 
CMP Re, RO SEND OF RENDOU? 
BNE 1$ 3NO - LOOP 
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DZDAAA.P11 TSTi1l2 CHECK OPEN WINDOW READ 


1481 006154 2s: 
1482 006154 Oie777? 000001 Od0664e MOV 


#1!1, WCSRA ;SET 1 INTO aWCSRA 
1383 005162 004767 OObi7e JSR PC, TEMO TIME THE RESPONCE a ee 
1485 
1486 ¢ KEK LALAL ALAA LAA ALKA LALA LAA LAL EL ALAA AA KALA AEA ALEK SALA ALEKS LALAAZLALLELAEE 
1487 TEST 113 CHECK OPEN WINDOW WRITE 
1488 © LKLEXEKSKRAEHEEHRKAKE LEAKE AALS RE KLE SEKAF XERESEKAL KERALA E LEK RFKERFLKEELALELE 
1489 006166 104400 tST113: SCOPE 
1491 006170 012777 000001 O0o626 MOV #1!1, WCSRA iSET 1 INTO SWCSRA 
1492 006176 004767 006156 JSR PC’ Timo TIME THE RESPONCE ree eo 
1493 006202 016700 o06642 MOV WADRA, RO GET WINDOM ADDRESS 
1494 006206 062700 O00500 ADD #500, RO : START 
1485 OO62l2 O1e703 000100 MOV #100/R3 :SET COUNT (300-676) 
1496 006216 010320 1S: MOV R3, (0)+ :LOAD THE DATA 
1497 006220 005303 DEC R3 :DEC THE COUNT 
1498 O06222 001375 BNE 1$ LOOP UNTIL DONE 
1499 006224 162700 o00200 SUB #200, RO ?BACK IT 
1500 006230 O12703 000100 MOV #100;R3 :SET COUNT 
1501 006234 011001 2s: MOV (0), Ri GET DATA FOR TYPING 
1502 006236 021003 CMP (0)'R3 s CHECK DATA 
1503 006240 001401 BEQ +4 :SKIP IF OK 
1504 OO06e42 104001 HLT +1 *DATA IS WRONG 
1505 o0S244 005720 TST (0)+ ADD 2 
1506 006246 005303 DEC R3 ?DEC THE COUNT 


i507 006250 001371 BNE ;LOOP UNTIL END 





me nt ne 
‘ 

i 

’ . 

i es 
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DZDAAA.P11 TSTL14 CHECK INSTRUCTION EXECUTION 
1508 § REXALL ALARA KALA ELAR ERE EEE KELELELE LER ELAR KEES RELERELEREELLERELRERERELELES 
1509 TEST 114 CHECK INSTRUCTION EXECUTION 
1510 STETETECESTSETETEST TEST TETTESTSTESTCTTTCSTESSTETTEST TPT E ECT TTTT TTT e ttre 
tail 006252 104400 TST114: SCOPE 
1513 cCOb254 012777 oO00001 ocoES42 MOV #1!1, WCSRA ;SET 1 INTO QWCSRA 
1514 OO06262 904767 006072 JSR PC’ TIMO ; TINE THE RESPONCE id 
1515 O06266 916700 Oo6SSE MOV WADRA, RO GET WINDOW ADDRESS 
1516 604760 000700 ISR Be. CODE (0) *EXECUTE CODE IN OTHER MACHINE 
1218 EST LIS CHECK INTERUPTS NNN NMBAAAEEEES 
1520 RGB EEE HEHE SEHR EGER Ee 
Bel 006276 104400 TST11S: SCOPE 
1523 006300 012777 006332 006536 MOV 84S, ONVECA :SET FOR TRAP 
1524 006306 013777 177776 OO&S32 MOV aePS, QNVECA+2 SET SAME PS 
1525 006314 012777 O00101 o0650e2 MOV #100!1, JWCSRA jSET 109 INTO QWCSRA 
1526 006322 004767 906032 JSR PC, TIMO TIME THE RESPONCE a 
1527 006326 104000 HLT H DID NOT INTERUPT A 
1528 006330 O00401 BR +4 >SKIP ON ERROR 
1529 006332 022626 4$: CMP (6)+, (6)+ “CLEAR STACK 
1530 006334 005726 TST (6)+ *CLEAR THE REST 
1531 006336 017700 ops462 MOV JWCSRA, RO “GET JWCSRA FOR TYPING 
1532 006342 022700 010100 CMP #19100, RO 1S QUCSRA = 10100? 

1533 006346 001401 BEQ °SK 

1534- 006350 104000 HLT * IWCSRA NOT 10100 
1535 006352 016777 OO6470 OD6464 MOV WVECA+2, JWVECA ;RESET FOR 

1536 006360 005077 O0b6462 CLR aWVECA+e ILL TRAP 

1538 

1539 006364 012777 O000001 op6422 MOV #1!1, JNCSRA :SET 1 INTO aWCSRA 
1540 006372 004767 O0S762 JSR PC, TIMO :TIME THE RESPONCE en gee 
1542 006376 012701 oO0004S MOV #45,R1 ;SET FOR DOUBLE LOOP 
1543 O06402 O0S000 20$: CLR RO ; WA IT 

1544 006404 005300 10$: DEC RO * BEFORE 

1545 006406 001376 BNE 10% s RESTARTING 

1546 006419 005301 DEC Ri OUNT 

1547 O0641le 001373 BNE 20S LOOP UNTIL DONE 


1648 006414 CO0167 001710 JMP DONE SLOOP 


—— 


MRINDEC namie 


DZDARAA.P 


1550 
i$S1 


1552 
1553 
1554 
1555 
1556 


~ 
uw 
v} 


Baa olal sunokot Gene oR oad 


ocs420 


006426 
006430 
006436 
006442 
DOBY45 
0045S 
O0&4S2 
006464 
006470 
006472 
006474 
006506 
006512 
O0ES14 
006516 
O06S24 
006530 
096540 


112767 


wS WINDOW STATIC TEST MACY11 27 
SECOND T0 GET WINDOW 


MAIN TEST 


OC0200 1723Se 


006368 


006344 


006322 


006300 


006255 


fs 


SECOND: MUVB 


f SHAARAALAFAESSLASLAELSAHLLRL EAS SHFELL SHSFAFSSLELELSAASSFASSAFASFLFLAALE LESS 


TEST 201 


s SKLEFSRAERELSELAFSSSSLAEAAESFSLALFESFAS LES EASEFSFAFFSSESSLELAL SS SASL LLSEFF SLES 


tst201: SCOPE 


ne eee + eee 


BOY 
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SAa=200 
#200, ICNT sSET TEST 201 


CHECK R/W OF WCSRA 


910000, aWCSRA 
awCSRA, RO 
a en "RO 


#10572, aWCSRA 
@WCSRA, RO 


810572,R0 
.o4 


#id452, dWCSRA 
aWCSRA "RO 
#10452, RO 


giQle2. aWCSRA 
AWCSRA, RO 


#10120, RO 


#10000, aWCSRA 


LOAD 10290_ gNTO SWCSRA 
GET FOR Ti? 

" gacsRA FOR icoco 
@WCSRA DOES NOT CONTAIN 10000 


sLOAD 10572 INTO aWCSRA 

FOR TYPING 

Sx te FOR 10572 

t BWCSRA DOES NOT CONTAIN 10572 


;LOAD 10452 INTO @WCSRA 
;GET ive TYPING 


ONE 
x 
~~ 


ECK SMCS FOR 10120 
DOES NOT CONTAIN 10120 
REGISTER 











435 


ie tt tt 


nuit 
RL 


b=b- 0-2 0-+ & +» 2 p< > B+ p 2 ~- 9+ B= 9-0 B09 


BORREBREE 


Bee 


a ee 


1 


c-il -DZDAR-A 
DZDRAA. Pi 


TST202 


BUS WINCOW oF nese TEST MACY11 276732) 


CHECK R/W OF 


eee Ce Ge a a ie SLELLLERELELRESF 


CHECK R/W OF WOBRA 
+ REEEREEEREERAERELEREELALEREELEREE AE RARE AERELEREEALELES LE ESSA SE ELEESET LESS 


:TEST 202 
tsT202: SCOPE 


177777 006250 MOV 
006244 MOV 
177777 CMP 
SEQ 
HLT 
OSeSeS S0be2t MOV 
006222 MOV 
OS2Se2S CMP 
BEQ 
HLT 
i@SeSe 006204 MOV 
906200 MOV 
l2Se2Se CMP 
BEQ 
HLT 
006164 CLR 
006165 MOV 
000009 CMP 
BEG 
HLT 


#-1, JKDBRA 
ty 


#52525, GuOBRA 
aud 
n52508!0, RO 


8125252, IWDBRA 
DWOBRA, RO 
eleSeSe10, RO 


aWOSRA 

JWOBRA, RO 
#0,R0 
+4 
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;SET THE SETABLE BITS 
;GET THE RESULT 
; CHECK as PROPER BITS 


3 SK K 
sWOBRA NOT -1!0 


;SKI 
;WOBRA NOT 125252!0 


: HDBRA NOT 0 





















sSel re ae rey e BITS 
:GET T 


SLE GK FOR PROPER BITS 
:WOBRA NOT S2S25!0 


3SET te ae LFOLE BITS 

GET THE 

:CHECK FOR PROPER BITS 
P IF OK 


;CLEAR ALL SETABLE BITS 
:GET THE RESULT 
3 CHECK co rewren BITS 


—s 
OUD 


ARIA TRAA AAA AAAS ta 


1640 


os 


BUS WINDOW Blt TEST MACY11 27(732) 


CHECK R/W 0 


006012 


Ce mee ree eee 
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aaa had ae eee Ses ee ae 


5 HECK R/W OF WRA 
SSEREREFSEREPSEREFFPRSLESEKRF ELS LEE SELES FEE FLA FEF SSE ES EELEF FEL SLE GSS S FE LE HS FF 
tST203: SCOPE 
MOV SIZE,Re ;GET WINDOW SIZE 
COM Re “MAKE IT A MASK 
MOV #0,R3 :GET THE DAT 
BIC "RS :CLEAR THE UNUSED BITS 
MOV R3, IWRARA ‘SET THE BITS IN WRARA 
MOV aWRARA, RO GET THE DATA 
SIC »RO “CLEAR THE J 
CMP R3,RO *CHECK THE DATA 
BEQ +4 *SKIP IF OK 
HLT : NOT 
MOV 8-1,R3 ;GET THE DATA 
BIC R2,R3 *CLEAR THE UNUSED SITS 
MOV R3, aWRARA SET THE BITS IN WRARA 
MOV § @WRARA,R :GET THE DATA 
BIC Re, RO “CLEAR THE JUNK 
CMP R3,RO CHECK THE DATA 
BEQ +4 *SKIP IF OK 
HLT “WRARA NOT -1 
MOV #52525,R3 ;GET THE DATA 
BIC R2,R3 “CLEAR THE UNUSED BITS 
MOV R3, OWRARA ;SET THE BITS IN WRARA 
MOV IWRARA, RO T THE DATA 
BIC »RO CLEAR THE JUNK 
CMP R3;RO *CHECK THE DATA 
BEG +4 *SKIP IF OK 
HLT *WRARA NOT S2S25 
MOV #125252,R3 ;GET T 
BIC Re, R3 AR THE UNUSED BITS 
MOV R3, JWRARA ISET THE BITS IN WRARA 
MOV OWRARA, RO :GET THE DATA 
BIC R2,R0 “CLEAR THE JUNK 
CMP R3;RO ; CHECK THE DATA 
BEQ +4 F OK 
HLT t WRARA NOT 125252 
CLR QWRARA CLEAR JUNK 








Bz 
£m 


gs 


NICS OP AEE RE Com ane 
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S 
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Pll TST204 CHECK CROSS COMMUNICATION BITS 
5 RREKRES KALLE EAA RAE RASA AA LARA LAAL AAA REL LARA RELA LLE REAL LALA SLE AAA ELLLELES 
sTEST 204 CHECK CROSS COMMUNICATION BITS 
SEKREREKEKLERERAEASSSLESEKSRALLESESARELEEARELELLARESLALAA FLARES LFFLFLEALEF FSS 
oo7o22 104400 tST204: SCOPE 
007024 005037 000006 CLR a8 ;CLEAR THE STATUS WORD 
007030 905037 bere CLR aaPs - SPL 
007034 612777 000001 o0s762 MOV #1!1, JWCSRA :SET 1 INTO QWCSRA 
007042 004767 9O0053le JSR PC, TEMO ‘TIME THE RESPONCE Me te 
p0704 O41 905758 MOV JWCSRA, RO :GET_OWCSRA FOR TYPING 
27 l CMP #19000, RO 315 awCSRA = 10000? 
007056 001401 BEQ KIP IF OK 
957069 HLT ay SRA_NOT 10000 
1 000001 005734 MOV #0!1, OWCSRA ioe 0 INTO aWCSRA 
007079 004767 o0S264 JSR PC, TiMO “TIME THE RESPONCE Pe Pr 
007074 017700 905724 MOV SWCSRA, RO GET SWCSRA FOR TYPING 
007100 022700 91100c CMP #11000;R0 sIS QWCSRA = 11000? 
007104 O01401 BE “SKIP IF OK 
007106 104 HLT :@WCSRA NOT 11000 
007110 012777 000011 005706 MOV #10!1,QWCSRA § ;SET 10 INTO aWCSRA 
007116 004767 005236 JSR PC, TIO ‘TIME THE RESPONCE 3 
007122 017700 OO0S&76 MOV DWCSRA, RO ;GET aWcSRA FOR TYPING 
007126 012010 CMP #12010, RO :1S aWCSRA = 
007132 001401 BEO *SKIP IF OK 
007134 104000 HLT :@WCSRA NOT 1201 
907136 012777 OO00021 cOoseé0 MOV #20!1,dWCSRA § ;SET 20 INTO eWCSRA 
007144 004767 O0S210 JSR PC, i : TIME THE RESPONCE 4 
007150 *GET JWCSRA FOR TYPING 
007154 *1S QWCSRA = 13020? 
007160 :SKIP IF OK 
007162 :SWCSRA NOT 13020 
007164 005632 *SET 30 INTO aWCSRA 
007172 “TIME THE RESPONCE 
007176 *GET SWCSRA FOR TYPING 
007202 "1S @WCSRA = 1 
007206 *SKIP IF OK 
007210 : IWCSRA 
005604 





aeueioni F 


eae | omean 
DZDAAA.P 


TST204 
017700 


BUS WINDOW STATIC TEST MACY11 27(732) 
CHECK CROSS COMMUNICATION BITS 


005574 MOV 
015040 CMP 
BEQ 
HLT 
000051 oOSSsS56& MOV 
005106 JSR 
OOSS46 MOV 
016050 CMP 
BEQ 
HLT 
000061 905530 MOV 
OOSOE0 JSR 
005520 MOV 
017060 CMP 
BEQ 
HLT 
900071 005502 MOV 
OCS032 JSR 
005472 MOV 
010074 CMP 
BEQ 
HLT 
000003 c0S4S4 MOV 
005004 JSR 
COS444 MOV 
010202 CMP 
BEQ 
HLT 
000401 0c0S426 MOV 


aWCSRA, RO 
#15040, RO 


#50!1, JWCSRA 
PC, TIMO 
JWCSRA, RO 
#16050, RO 
#60!1, JWCSRA 
PC, TIMO 
SWCSRA, RO 
#17060, RO 
#791, IWCSRA 
PC, TIMO 
BWCSRA, RO 
#10074 RO 
+4 

82!1, QWCSRA 
PC, TIMO 


AWCSRA, RO 
nidede, RO 


#400!1, aWCSRA 
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;GET re FOR TYPING 
15 iar ‘ 15040? 


; SK K 

sMWCSRA NOT 15040 
;SET 50 INTO JWCSRA 
TIME THE RESPONCE 


;GET_@WCSRA FOR TYPING 
:15 MWCSRA = 16050? 
;SKIP_IF OK 
:GWCSRA NOT 16050 
:SET 6 INTO aWCSRA 

TIME THE RESPONCE 


5 
o3 
— 
= 
33 
5 


« 1D se 


- A ae 


e 1B as 
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“Pll TST205 Bech Neos WOBR*S WITH WINDOW CLOSED 
1731 TTT TT TTT TTT TTT TTT TTT TTT TTT TTT TT TT TTT TTT TTTTTTTTTTTTT TTT TTT TTT TTT 
? TEST 20 CHECK CROSS WOBR’S WITH WINDOW CLOSED 
1733 STECESECOTETET STOTT T ETT ETE T TST ST ETT TTTESTT TET TTTSEETTTeTTST TT TTT Terry 
1734 007376 104400 tst20S: SCOPE , 
1735 007400 004767 O047S4 JSR PC, TIMO sTIME THE RESPONCE way ee 
1737 007404 912777 000001 oos41e MOV att aWCSRA ger 1 INTO aWCSRA 
738 OO74l2 004767 O0474e JSR tim \* “TIME THE RESPONCE | pe 
007416 017700 oOS406 MOV >t BRB, ;GET GWOBRB FOR TYPING 
1740 007422 022700 177777 CMP S SWOBRB = -17 
1741 007426 001401 BEQ SKIP IF OK 
i74e 007430 104000 HLT :JWOBRB NOT -1 
1744 007432 012777 177777 005366 MOV #-1, INDBRA ; LOAD -1 INTO SWOBRA 
1745 007440 Ole777 000001 005356 MOV #1! 1. aWCSRA get 1 INTO aWCSRA 
007446 004767 004706 JSR PC. TIMO TIME THE RESPONCE om 
007452 017700 00532 MOV SWOBRB, RO GET aWDBRB FOR TYPING 
1748 007456 700 900000 CMP #0, RO 21S ; 
1748 007462 OO1401 BEQ +4 ‘SKIP IF OK 
1750 007464 T :@WOBRB NOT O 
1752 007466 012777 000000 005332 MOV #0, QWDBRA sLOAD O INTO 
1753 007474 912777 000001 005322 MOV #141, JWCSRA SET 1 INTO aWCSRA 
1754 007502 004767 O046S2 ISR PC. TIMO TIME THE RESPONCE 4 
1755 D750 017700 005316 MOV WOBRB, ;GET_QWDBRB FOR TYPING 
1756 907512 022700 S2525,R0 :1S 
1757 007516 001401 BEQ + ‘SKIP IF OK 
1758 104000 HLT @WOBRB NOT S2S525 
1760 007522 012777 005276 MOV #52525, IWDBRA ;LOAD S2525 INTO @WDBRA 
1761 007530 012777 000001 005266 MOV #1!1, aWCSRA >SET 1 INTO aWCSRA 
1762 007536 004767 O04616 JSR to TIME THE RESPONCE S 
007542 017700 O0S26e2 INOBRB, RO GET QWDBRB FOR TYPING 
| 1764 007546 022700 125252 CMP #125252, RO "IS QWOBRB = 125252? 
1765 og 755e 001401 +4 >SKIP IF OK 
| 1766 64 104000 HLT :SWOBRB NOT 125252 
007556 012777 125252 oose42 MOV #125252, DMDBRA ;LOAD 125252_INTO WOBRA 
| 1769 007564 012777 OO0001 o05232 #1'1, aWtSRA :SET 1 INTO a@WCSRA 
| 
; 
} 
i 
| 
| 
i 
| 
H 
| 
| 
| 
| 


en 
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DZDARA.P11 TST20& CHECK CROSS WDBR’S WITH WINDOW OPEN AND CLOSED 


li FECT OORT CHECK CROSG WOBR'S WITH WINOOM OPEN AND CLOSED 
ie ‘TEST 206 CHECK CROSS WOBR’S WITH WINDOW OPEN AND CLOSED 
¢ 
177e STSSETESETTT TIT TS TT TTT PETITES TESTS ETE TTTT ESET TET ITS T ESET eee Tre TT eer Terry | 
1773 007572 104400 tST206: SCOPE 
1774 
1775 007574 904767 004560 JSR PC, TIMO 5 IME THE RESPONCE 
1775 007600 912777 OO0401 o0Se16 MOV #400'1 QWCSRA :SET 400 INTO aWCSRA 
1777 007606 004767 O04S46 JSR 1md “TIME THE RESPONCE 
1778 O07ble 17700 00S212 MOV IWOBRB. RO GET QJWDBRB FOR TYPING 
1779 OO761E pb25 125252 CMP nlesese, RO 1S QWDBRB = | 
+ 
1780 007622 001401 BEQ SKIP IF OK 
1781 007624 T :3WDBRB NOT 125252 
1783 007626 012777 OS2525 005172 MOV #52525, WDBRA  ;LOAD S2525 INTO aWDBRA 
1784 007634 017700 O0S166 MOV JWOBRA, RO ;GET_ aWOBRA FOR TYPING 
1785 007640 022700 125252 CMP blesete, RO :1S SWOBRA = 125252? 
1786 44 001401 BEQ ‘SKIP IF OK 
178? 007646 HLT :@WOBRA NOT 125252 
1789 007650 012777 000001 opsi4s MOV #1!1, dWCSRA sSET 1 INTO aWCSRA 
1790 007656 004767 904476 JSR PC’ TiO :TIME THE RESPONCE ~ 
1791 007662 012777 052525 005136 MOV t5de25, QWOBRA ;LOAD S2525 INTO aWDBRA 
1792 007670 012777 O00001 O0S!26 MOV 1, HCSRA *SET 1 INTO aWCSRA 
1733 004767 OO44S6 JSR Be ‘THA TIME THE RESPONCE 4 
1794 017700 005120 MOV AWOBRA, RO GET QWOBRA FOR TYPING 
1795 022700 052525 CMP aSeSe5, RO TS QWDBRA = 52525? 
179% 007712 OO1401 BEQ :SKIP IF OK 
1797 007714 194000 HLT IDBRA_NOT 
1798 907716 012777 o00001 005100 inne 
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Pll TST207 CHECK ERROR CONDITIONS AND LOCKOUT 
1739 cy ogy TTA SNOHECK ERROR CONDITIONS AND LOCKOUT 
1800 ; TEST 207 CHECK ERROR CONDITIONS AND LOCKOUT 
1801 © LHELLREAS RRL AKAE RASA KRKSAALE RE RAL AER L ARE RE KE REEERF RELA AALS LE LALA FLEES 
1802 007724 104400 tsT207: SCOPE 
1804 007726 004767 0cO4426 ISR PC, TIMO ;TIME THE, RESPONCE we pe 
1805 007732 905077 005076 CLR IWRARA “MAP TO OK BANK 
1806 007736 012777 000001 ooso60 MOV #1!1, aWCSRA ‘SET 1 INTO aWCSRA 
1807 007744 004767 dO4410 JSR PC TIMO TIME THE RESPONCE 
1808 00775C 012777 OO0401 opso4% MOV #400! 1, OWCSRA igeT 400 INTO JWCSRA 
1809 007756 7 004376 JSR PCT TIME T SPONCE ss 
1810 007762 012777 000003 o0S034 MOV #2!1. aWCSRA *SET 2 INTO aWCSRA 
1811 007770 7? QO4364 JSR PC’ TIM TIME THE RESPONCE Ye 
181¢ 12777 000403 onsO22 MOV. e402" QWCSRA :SET 402 INTO QWCSRA 
181 Sane ai 767 O04 ISR PC Tino *TIME THE RESPONCE (e. 
1814 010006 016705 O0S165 MOV OFFSE GET OFFSET 
1815 O100le 016577 015124 005014 MOV AORTA) SWRARA:SET TO PERF PAGE 
1816 010026 012777 000403 004776 MOV O2!1,awcSRA ;SET 402 INTO aWCSRA 
1818 
1818 5; LRRRELELELEL FLERE ELE ELL ALLL LLLAALELALAAA REL ELL AL LALA LLLFLELELE LAE RELELEE 
1820 : TEST CK WINDOW SIZE AND 
1821 ESTSSTETOCTOC OTT TT TTT TTT ETT T TEES TTT ESET ESET T ETT ETE T TTT TT TEST TTT SET ETT TTT 
1828 010026 104400 tST210: SCC7E 
1824 010030 004767 004324 ISR PC, TIMO ; TIME THE RESPONCE Die: ee 
1825 010034 005077 004774 CLR : 
1 010040 012777 000001 004756 MOV #191, INCSRA jSET : INTO QWCSRA 
1 91004 032777 019000 004750 BIT #10000, dWCSRA  ;NEW DATA SET? 
1828 010054 001774 BEQ - : 
1829 01005 012777 000001 004740 MOV #1!1,QWCSRA :SET 1 INTO aWCSRA 
1831 
1832 rei CHECK HINDG POORESSING CaPaaility eee 
1833 TEST 211 K WINDOW ADDRESSING CAPABILITY 
1834 ht | ed ee 
1836 010064 104400 tST211: SCOPE 
1837 O10066 004767 O04266 ISR PC, TIMO sTIME THE RESPONCE 
1838 010072 bOs0e? 005004 CLR prsp INITIALIZE EXP DISPLACEMENT ADOR 
1839 019076 1 004734 004730 - MOV DWADRAX,OWRARA ;FORCE THE WINDOW TO RELOCATE TO ITSELF 
| 1841 010104 012777 oD0403 004712 MOV #402!1, QWCSRA  ;SET 402 INTO aWCSRA 
1842 O101l2 004767 oo4e4e JSR PC Find *TIME THE RESPONCE es 
1843 010116 032777 007000 004700 BIT #7000,aWCSRA § 315 TEST COMPLETE? 
1844 010124 001024 BNE 2s *BRANCH IF YES 
1845 010126 017700 004672 MOV WC GET STATUS 
184 010132 022700 110402 CMP aT TouOs RO IS IT CORRECT? 
1847 010136 001401 BEQ +4 *SKIP IF OK 
UE! 010140 chee HLT *NO TIMEOUT ERROR 
| 1849 010142 042777 100000 oD4e54 BIC #100000, 9WCSRA ;CLEAR THE ERR 
| 1850 10150 017700 OO4ESE MOV JWDARA, RO *GET DISPLACEMENT ADDR 
| 1851 010154 016701 oo47ee MOV DISP, RI *GET EXP DISPLACEMENT ADOR 
1852 O10160 o20001 - CMP RO, Ri *1S DISPLACEMENT ADDR CORRECT? 
1853 010162 001401 BEQ +4 °5 
1854 O10164 04001 HLT +] DISPLACEMENT ADDR INCORRECT 
| 
t 


















MAINDEC-11-DZDAR-A BUS WINDOW STATIC TEST MACY11 27(732) OS-0CT-76 10:45 PAGE 49 
DZDAAA.P11 TST211 CHECK WINDOW ADDRESSING CAPABILITY 


1855 010166 O6e767 OO0002 o04706 ALD #2, DISP ‘UPDATE EXPECTED ADDR 
1856 010174 000743 BR 1$ *LOOP 

1857 010176 4 2s: 

1858 010176 o12777 900001 oOo46e20 MOV #1'1, WCSRA ;SET 1 INTO aWCSRA 

1860 

1861 5 LELARASERRAALL LALA RE LALL LAA ELAS EE LELE LAER ELRERE RELA LALLA RE ELELLELAFERAELE 
1862 2ile CHECK OPEN WINDOW READ 

1863 STTETTETSTET TTT TTT TTT TET TET TESTE TETTTTT TESTE TESTE TTT TEST T ETT eet TTT TS 
1864 010204 104400 | tST212: SCOPE 

1865 010206 004767 004146 ISR PC, TIMO ; TIME THE RESPONCE a 

1867 O10212 005077 OO4616 CLR DWRARA *SET TO BANK O 

1868 O10216 012777 O00403 oD4600 MOV aHOe' TL, QWCSRA :SET 402 INTO @WCSRA 

1889 010224 032777 010000 0o04S72 BIT #10000" aWCSRA ; NEW DATA SET? 

1870 010232 001774 BEQ 6 

1871 010234 012777 000001 oD4Ssbe MOV #1!1,QWCSRA SET 1 INTO aWCSRA 

1873 

1874 5 REEXRE KEKE LELE RE LALA RELA LALERAARE LE SELLER ALEK AREA LEE ER ELE LEE EE LELELELEE 
1875 ‘T K OPEN WINDOW WR 

1876 STESETTTECTETETE TELE TTT TOT TET TET TT TTT TTP ETT TETETTTETTTETTTTTTT TEST TTT TTT. 
1877 010242 104400 tST213: SCOPE 

1879 019244 004767 004110 ISR PC, TIMO sTIME THE RESPONCE ay ee 

1880 010250 005077 O04S60 CLR aWRARA ‘SET TO BANK O 

1881 01025% 012777 O00403 oco4s4e MOV #402!1,aWCSRA :SET 402 INTO aWCSRA 





a ee ee nr ne ee OY A RE ee 
r 
‘ 


MAIN 
DZDAR 


010262 
010264 


010270 
010274 


010302 


010304 
010310 


010316 
010322 


C-11-DZDAR-A 
Pll 


TST2i4 


104400 
004767 


005077 
012777 


104490 
004767 
012777 


004767 
012777 


CHECK INSTRUCT 


004070 


004540 
000403 


004050 
000001 


004036 
000091 


004522 


004506 


004474 


TA ft Pe luTton 27(732) 


ION 


o 
? 


$s LHERLERA ALLL RAAL ARAL RE LELE LAER ALLER RELL RE RK LER EEE RRRE FLERE ELERELELEALE EEE 


tST214: SCOPE 
ISR 


CLR 
MOV 


HBG EHH EHH HGH ETE 


tStT215: SCOPE 


JSR 
MOV 


JSR 
MOV 





PC, TIMO 
#141, aWCSRA 


04 


OS-OCT-76 10:45 PAGE SO 


HECK INSTRUCTION EXECUTION 


PC, TIMO 
JWRARA 


#402! 1, JWCSRA 
(27 eee oo" "eee: 


; TIME THE RESPONCE 


;SET TO BANK 0 
SET 402 INTO QWCSRA 


HECK INTERUPT 


PC, TIMO 
#141, aWCSRA 





;TIME THE RESPONCE 
SET 1 INTO JWCSRA 


; TIME THE RESPONCE 
SET 1 INTO QWCSRA 


sie” 8 EE DRIRETION DEIN 
14 


o dae 


o Bb ae 


o B ae 
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maken te BUS WINDOW STATIC TEST MACYL1 27(732) OS-OCT-76 10:45 PAGE 51 
DZDAAA TST215 CHECK INTERUPTS 


4 DONE: ‘OPE 
1368 se Ap230 000001 170446 tite #1,PCNT+2 sADD ONE TO THE pass COUNT 
005567 170440 ADC PCNT ‘MAKE IT DOUBLE PREC. 
lage a iG 737 002000 177570 BIT #SW10, J#SWR ;RING THE BELL? 
1906 010252 o0100e BNE 4§ *NO 
1907 610354 000004 000007 TYPE BELL ‘RING THE BELL 
1 610360 3700 ooo04e 4g; MOV gute, RO G6 MONITOR ADDRESS 
1 10364 6014 BEQ BRANCH IF NONE 
1916 010366 004710 JSR 3 (0) GO TO NMONITOR 
1911 010370 o00240 NOP 
131g 10372 000240 NOP 
1913 610374 900040 NOP 
1918 010376 000167 173020 38: JMP GO : RETURN 
1916 
1917 
1918 
1313 : $TYPE MESSAGE TYPEOUT ROUTINE 
192] sTHIS ROUTINE IS USE TO TYPE ASCII NESSAGES ON THE TTY. THE 
1922 *CALL CAN BE IN ONE OF 3 FORMS: “TYP E AOR” - TYPES THE 
1923 : MESSAGE STARTING IN LOCATION “ADR: TYPE .CHAR" - TYPES 
1924 *THE ASCII “CHAR”, AND 3) “PRINT C18) Clay MESSAGE) - TYPES 
1925 “THE MESSAGE ict IS INLINE ASCII. 
1927 O10402 O10467 000146 I0TS: MOV RY 10718 ;SAVE RY 
1928 O10406 O10S46 MOV TTY, -( *SAVE TTY RS=TTY 
1929 010410 017605 coDnoe MOV sob) ery *GET ADDRESS TQ BE TYPED 
1930 910414 032705 177400 BIT #177400, TTY 31S 1 YPEM? 
1931 010420 O01 BNE i§ :NO 
1932 O10422 010567 000124 MOV TTY, . TYPE GET THE CHARACTER 
1933 910426 012705 010552 MOV t, TIPE, TTY ; FUDGE THE ADDRESS 
1934 010432 105715 1S: TSTB : TERMINATOR? 
1935 010434 001423 BEQ _ “GET OUT IF SO 
1936 010436 122715 oo0nl12 CMPB so #2, (TTY) 71S THE CHAR A LINE FEED? 
1937 O10442 O01012 BNE 4§ *BRANCH IF NO 
1938 O10444 116704 000101 MOVB  FILCHR+1 GET FILLER COUNT 
1939 S104SO 116737 000074 177566 SS: MOVB  FILCHR 1 erste | ‘OUTPUT FILLER CHAR 
1940 O104S6 105737 177564 TSTB =: 9 #177564 WAIT FOR DONE 
1941 010462 100375 J a? 
1942 O10464 005304 DEC RY sDECREMENT FILLER COUNT 
1943 010466 001370 BNE 5% 
1944 010470 112537 177566 4: MOVB = (TTY)+,9#177566 ;LOAD AND TYPE THE CHARACTER 
1945 010474 105737 177564 TSTB =. 8177564 -1S THE PRINTER READY 
19468 010500 100375 BPL 4 “WAIT UNTIL IT IS 
1947 010502 000753 BR 1$ sGET THE NEXT CHARACTER 
1948 010504 017646 oD000e2 2s: MOV 32(6),-(6) *GET ADDRESS TO BE TYPED 
1949 010510 062766 090002 oo0004 ADD #2,4(6) "ADD 2 TO THE ADDRESS 
1950 O10516 Oecb66 200002 CMP (65+, 2(6) 31S IT .42? 
1951 010522 001006 3$ ; 
1952 010524 062705 o90002 ADD #2, TTY "ADD 2 TO THE ADDRESS 
1953 010530 042705 o00001 BIC #1; TTY "BACK UP TO AN EVEN BYTE 
1954 010534 O10S566 000002 MOV TTY, 2(6) "RESTORE ADDRESS 
1955 O10S40 012605 38: MOV (6)4. TTY RESTORE TTY 
1956 010542 016704 o00006 MOV 10T1$,R4 RESTORE RY 
1957 010546 Oo0000e RTI > RETURN 





PMS fie ear cee tees MOM -S 


MAINDEC-11-DZDAR-A BUS WINDOW STATTC TEST MACY11 27(732) OS-OCT-76 10:45 PAGE Se 


; OZDAAA.P11 TYPE ROUTINE 
| 1958 o10550 001000 FILCHR: iu0dd ;FILCHR=0 (CHAR) FILCHR+1=2 (COUNT) 
| 1959 Q105Se c00000 TYPE: Q ;CHARACTER TYPE LOCATION 


1980 010554 000000 0T1$: 0 


! 
i 
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MAINDEC-11-DZDAA-A BUS WINDOW STATIC TEST MACY11 27(732) OS5-OCT-76 10:45 PAGE S3 
DZDAAA.P11 TYPE ROUTINE 





1961 O105S6 012767 009300 170214 GO.HST: MOV #300, ICNT *HOST COMPUTER ENTRY 
136¢ 010564 012706 000500 MOV #500, SP ‘INITIALIZE STACK 

‘ae ‘tect a01 POWER FAIL TEST ~ PF ~ GOES DOWN - BITL2 SET 
ieee 010570 104400 {USELERESCEERENEREOUEERORESEREEEDESEROSHERERENEEEOESENEEEERESEOSSESOHEIEEE 
1968 

1969 010572 012737 010630 oo0024 MOV #15, 0824 sSET FOR POWER FAIL 

1970 010600 012737 O00340 o00026 MOV #340, a#26 T UP 

1971 010606 012777 010672 co4e2¢ MOV #2$. JWVECA SET FOR WINDOW TRAP 

1972 010614 012777 O00S02. so4202 MOV #502, aWCSRA OPEN WINDOW AND I/E 

1973 g10b22 oo0001 WAIT sHAIT FOR INTERUPT 

1975 010626 000776 BR -2 *LOCK IT UP 

1976 010630 O22626 1S: CMP (6) +, (6)+ ;CLEAR THE STACK FROM THE PF TRAP 

1977 010632 012777 010652 004352 MOV £3 SPUVECS sRESET UP VECTO 

1978 010640 017746 OO4160 MOV gue CORA A, -(6) AVE WCSRA ON THE STACK 

1979 O10644 010667 904340 MOV AVES ig VE THE SP 

1980 010650 000000 HALT WAIT FOR POWER FAIL 

1981 O10652 016706 004332 3S: MOV son SP RESTORE THE SP 

1982 O10656 012600 MOV (6)+.RO GET FOR TYPING 

1983 O10660 022700 120706 CMP #120706, RO *CHECK THE WCSRA 

1984 O10664 001401 BEQ +4 - SKIP IF OK 

fe Ieee Abies ae te ito taes TE 

1987 010872 O22b26 2s: CMP (6)+, (6)+ chen S 

1988 010674 017700 oo41e4 MOV JWCSRA, RO *GET FOR TYPING 

1989 910700 104000 HLT *SHOULD NOT HAVE TRAPPED 

1990 010702 012737 oD0026 ooo024 4s: MOV #26, a824 RESET PF Y 

1991 010719 005037 177776 CLR aePs LOWER PROCESSOR STATUS 


ee eee 
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MRINDEC=11-DZOAR=8 _ BUS WINDOW STATIC TEST MACYL1 27:732) OS-OCT-76 10:45 PAGE SY 
DZDAAA.P1! T7202 POWER FAIL TEST - NO PF - STAYS UP - BITI3 SET 

1582 TET OER PAIL TERT OND PFs GTAYE IP BITIa GET 
1983 TEST 302 POWER FAIL TEST - NO PF - STAYS LP - BITI2 S$ 

1ss4 peaneneseusananouseusenssonsnsesSHsesGNsunianeseanansonsesessetoeataests 
13% 010714 104400 tST302: SCOPE 

1897 C1O718 012737 O107S54 sODoDe4 MOV $13, 0824 :SET FOR POWER FAIL 

1998 010724 912737 000340 Oo00ce6 MOV aa40 2826 IT uP 

1999 O10732 O12777 011010 OO4i04 MOV #23, JWVECA eet FOR WINDOW TRAP 

2000 010746 Oler7? o00sd2 oo40s6 May 8502, JWCSRA :OPEN WINDOW AND I/E 

2091 O10746 00000: WAIT sHaTT FOR INTERLPT 

2002 010750 900000 HALT =RETURN FROM T 

2003 010752 900776 BR “ee, zh. CK IT UP 

2004 O10754 O22626 : 18: CMP CLEAR THe STACK FROM THE PF TRAP 

200S 610756 Ole777 019776 oco4e26 MOV 135 one tRESET iP VECTOR 

2006 p10764 017746 oO4034 MOV aWCSRA, (6) SAVE usr CN THE STACK 

2007 Ol 010867 o04214 MOV SF, SAVES ish VE T 

2008 016774 900000 HALT WAIT FOR POWER FAIL 

2009 010776 916706 o04206 38: MOV SAVE, SP RESTORE THE SP 

2010 O11002 012600 MOV (6)+,R0 : 

2011 O11004 104000 HLT : 

20l2 011006 900407 BR 4§ : 

2013 O11010 O2reet 2s: ¢ (6)+, (6)+ : 

2014 O110le 017700 co4D0s “OV aWCSRA, RO : 

2015 O11016 022700 120706 CMP #120706, RO : 

2016 011022 OO1401 BEQ a : 

2017 O110e4 104000 HLT : 

2018 011026 012737 o000=. o00024 4s: MOV 826, 3824 : 

2018 11034 000004 011040 TYPE =, . #2 ; 

2029 4511956 900000 HALT 


A ce te ee te en a a eR RR NR a NN a 


ee Ee LT TT A LT EL NTE 
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MAINDEC-11-02DAA-A BUS WINDOW STATIC TEST MmaSY11 27(732) OS-0CT-76 10:45 PAGE SS 
DZDAAR.Pil TST302 POWER FAIL TEST - NO PF - Si4YS UP = BiT13 SET 


2021 011080 012767 000310 167712 GO.OTH: MoV #310, ICNT OTHER COMPUTER ENTRY 

e023 er ie POUER FAIL TET © PF © GOES DON © BITl] eT 
TEST 311 POWER FAIL TEST - PF - GOES DOWN - BITI3 SET 

ebes S RELREKERESSERSSAESASA ESF SLALSLFLE SESS ESAS RELEARALESSALES SEALE S ELE LELSSFSAILGE 

odes C1106 104400 tST311: SCOPE 

2028 011070 012737 011126 op0024 MOV #1$, 0824 ;SET FOR POWER FAIL 

2023 011076 Ole737 00340 000026 MOV = -#340, 826 3L.0¢ 

2930 011104 Ste777 611170 603732 MOV #23. aWVECA :SET “FOR WINDOW TRAP 

2031 Olllje Ole777 000502 003704 MOV 8502, aWCSRA :OPEN WINDOW AND I/E 

2032 011120 900001 WAIT WAIT FOR INTERUPT 

2033 Ollle2 900000 HALT RETURN FROM 

2034 Olile4 000776 BR - T uP 

2035 O111l26 Oerbe6 1S: CMP ‘PEAR THE STACK FROM THE PF TRAP 

2036 911130 01e777 011150 oo4os4 MOV 855 idpuvecs *RESET UP 

2037 O11136 017746 003662 MOV aWCSRA, -(6) :SAVE WCSRA ON THE STACK 

2038 011142 010667 ove MOV oh SAVES :SAVE THE SP 

2039 011146 o00000 HALT sHALT FOR POWER FAIL 

2040 011159 016706 O04034 3S: MOV SAVES. SP *RESTORE T 

204: O11154 912600 MOV . (6)4,R0 GET FOR Te 1he 

Po42 O11156 Oer700 120706 CMP #120706, RO ; CHECK THE WCSRA 

2043 O11162 OOl40i BEQ +4 IP IF OK 

2044 O11164 104000 HLT :WCSRA NOT 120706 AFTER PF 

2045 011166 OO00404 BE ag :SKIP WINOQH AREA 

2046 O11170 Oers26 2s: CMP (6) +. (6)+ ‘CLEAR ST RCK 

2047 011172 017700 o03626 MOV BWCSRA, RO sGET FOR TYPING 

2048 O11176 104000 z HLT :SHOULD NOT HAVE TRAPPED 

2048 911200 612737 ood026 coo0e4 4s: MOV 826, 09824 “RESET PF VECTOR 





2+ Some ene ren eee are oe a ee 


a ee Ce en ore canes ee oe ewe 


011206 


tfururufry 
hye 


SSRs ales 2s 


WWW 


ONONOOOOOOOOOOOOOOO0OO0O0000 
STer = 
wma 


0 ~~ 6-= b= p< > =< b= b= & b= & = 6 ~~ 9 -= bs B= 9-2 9-2 f-© B= Bs OH 2 He 
b=0 + 0-= > O— b-< + & + b= 9-2 > PD ~ B- 92 B= H-2 H 2 § ~< P—» B—2 f—-0 Bp Be 
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US WINDOW STATIC TEST MACY11 27(732) OS-OCT-76 10:45 PAGE S& 
POWER FAIL TEST - PF = GOES DOWN - BIT13 NOT SET 


000024 
OOCle& 


003612 
003564 


003734 


000024 














;EEREREREREOEEOESECHEEE SELAEEEEEELEREEREEEEESSEEESEEEEHSE EEE NEE EHTS OE 
TEST 312 POWER FAIL TEST - PF - GOES DOWN - BITL3 NOT SET 
TUT pe coc aeepeamaestpectnts enlaces macetamntgenc ert ~a23-redplirscomnshonivey 

i C 





MOV #1$, 0824 :SET FOR POWER FAIL 
MOV #340, deeb -+LOCK_IT uP 
MOV #23. JWVECA :SET FOR WINDOW TRAP 
MOV #502, aWCSRA OPEN WINDOW AND I/ 
WAIT ‘WAIT FOR INTERUPT 
HALT RETURN TRAP 
8R -2 *L reid fie" 
18: CMP (6)+, (6)+ ‘CD EAR THE STACK FROM THE PF TRAP 
MOV 833, SPUVECS "RESET UP VECTO 
MOV aWcSRA, -(6) SCE WCSRA ON THE STACK 
MOV SP, SAVES VE T 
HALT WAIT FOR POWER FAIL 
38: MOV SAVES, SP swaIT FO THE SP 
MOV (6)+,R0 :GET FOR TYPING 
CMP #706,R0 * CHECK THe WCSRA 
BEG +4 SKIP IF OK 
HLT sHCSRA NOT 706 AFTER PF 
aR ug SKIP WINDOW 
28: CMP (B)+. (6)+ CLEAR STACK 
MOV BWCSRA, RO iGET FOR TYPING 
HLT : SHO ULD NOT HAVE TRAPPED 
4§: MOV #26, 3824 ;RESET F VECT 
TYPE ,¢e iReeeiz ISS C15 "END OF TEST” 

















TST312 POWER FAIL TEST - PF = GOES DOWN - BIT13 NOT SET 
2079 O113S2 Ol2767 000320 167420 GO.NE1: MOV #320, ICNT ;NIETHER COMPUTER ENTRY - FIRST 


pH ee Ter “A SUS _WINDOW STATIC TEST MACY11 27(732) 05-OCT-76 10:45 PAGE $7 


§ REAAAERAAAA HALAS ARAL A RA RAA ALAA LAKE LARAA EAA LARA LA LARA FRALELERELFELLARELELS 
TEST 321 POWER FAIL TEST - PF - GOES DOWN - BITI13 NOT SET 
s SHLASSREAALAALE FRE LSSAELERERA FALAFEL ALARA SS ALARA LASREL ERA LAL EAALELALSZLLFLELE 
011360 104400 tST321: SCOPE 
011362 012737 011420 op0024 MOV #1$, 0824 sSET FOR POWER FAIL 
1370 012737 000340 o000e6 MOV #340, 3826 ‘LOCK IT UP 
012777 011462 O03440 MOV #23, JWVECA SET FOR HTNOOW TRAP 
0120777 O00S02 O0341e MOV #502, JWCSRA :OPEN WINDOW AND IVE 


siaciennntetginaata 


OYVOAOIOOOOCOOODdOOOV0O0O00O00O 
& = Ob bs 2 ps 62 B—-0 bh Ba fs & 2 Ban 2 Fs pa fH = Bm Bat Be 
bo B92 B= bh BB § 2 Fh 9-8 Bt he fo Ps fe Bw Bo he Bape 


900001 WAIT * WAIT FOR INTERUET 
000000 HALT *RETURN FROM TRAP 

000776 BR -2 “LOCK IT UP 

022626 1S: CMP (6)+, (6)+ ‘CLEAR THE STACK FROM THE PF TRAP 
012777 O11442 003562 MOV 83S, dPUVECS :RESET UP VECTOR 

01774 003370 MOV DWCSRA, -(6) : SAVE WCSRA ON THE STACK 

010667 003550 MOV SP, SAVEG SAVE T 

000900 HALT :WAIT FOR POWER FAIL 


BAST REROB SES PONG ceo! 


016706 o03s42 38: MOV —«- SAVE6, SP tRESTORE THE SP 
2039 012600 MOV (6)+, 80 :GET FOR TYPING 
2100 000706 CMP = s«8706°RO CHECK THE, WCSRA 
2101 001401 7 ae IP IF 
2102 104000 HLT ;WCSRA NOT 706 AFTER PF 
2103 oo0404 BR 4g ‘SKIP WI 
510 Of5958 003334 es: ov eS ee ai 
| 3106 Ta4000 HLT {SHOULD NOT HAVE TRAPPED 
2107 012737 900026 oco00e4 4s: MOV #26, 9824 "RESET c 
2108 905037 177776 cLR 4 au’ LOWER PROCESSOR STATUS 





ns ee ne ne ane nme or = . - me eee ee 





MAINDEC-11-DZDAA-A 
DZDARA 


ln ee 


rurururururururururururufururururururufrururur irururofury 
02 0 02 Fe bo bs Bw be 2 2 Pe fn Pn fs bo Bs 0 Bo hs Fe hh Pe he 


RRA B ERY Y 
De cueRBe INR ToOs LGORES 


ONOWOOOOOOO00000000000 
Bb 2b + be fs fs hm HB ~0 6 ho Pe fhe bs ne 2 Gans 8 Pune fie Bs He 
o = b+ b-2 b—0 §— f= b— §— 2 B= h—9 Ho 2 bh Pe H— Fo 9 Pe HP 
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BUS WINDOW STATIC TEST MACY11 27(732) OS-OCT-76 10:45 PAGE SB 
POWER FAIL TEST - NO PF = STAYS UP - BITI3 SET 


5 SERIE HEHEHE MEER HEHE EE EHH ER ERE EERIE EERE EEE REE EE EEE EERE EEE EE EERE EEE 

; POWER FAIL TEST - NO PF = STAYS UP - BITI3 SET 

ee ee eee 
322: SCOPE 


011544 000024 MOV #13, 0824 :SET FOR POWER FAIL 
000340 000026 MOV #340, a826 “LOCK I 
011600 003314 MOV #23, OWVECA SET FOR WINDOW TRAP 
000502 003266 MOV #502, JWCSRA :OPEN WINDOW AND I/E 

WAIT :WAIT FOR INTERUPT 

HALT RETURN FROM TRAP 

BR 2 *LOCK IT UP 

1S: CMP (6)+, (6)+ ?CLEAR THE STACK FROM THE PF TRAP 

011566 003436 MOV #3$, MPUVECS *RESET UP VECTOR 
003244 MOV aWCSRA, -(6) :SAVE WCSRA ON THE STACK 
003424 MOV SP, SAVES : SAVE 

HALT :WAIT FOR POWER FAIL 
003416 38: MOV SAVES, SP *RESTORE THE SP 

MOV (6)+,R0 *GET FOR TYPING 

HLT ‘DID NOT POWER FAIL 

BR 4§ >SKIP WINDOW AREA 

23: CMP (6)+, (6)+ *CLEAR STACK 

003216 MOV aWCSRA, RO *GET JWCSRA FOR TYPING 
120706 CMP #120706, RO IS aWCSRA = 120706? 

BEQ 44 ‘SKIP IF 

HLT :JWCSRA NOT 120706 

000024 4s: MOV #26, 3824 RESET 


000026 ; PF VECTOR 
000348 177776 MOV #340, HPS ;RAISE PROCESSOR STATUS TO 7 





ee 


lo eo een On 2 eae SSE on ae ES ee NA 


MA 
02 


2137 
2138 


O-+b < 0-9 B= B+ 6 pp p= 


rurururururorurururururururururururorururururorurororuru 


PATS COS AOU IN ee eee ee eee 


|=] oO 
be 
——— eH 
or 
< 
fu 


paee 


QOO000000D 

bs — hoe 
at 
Fe 


b-2 b— b+ 6 ob = ps Hh hs po pe 


670 


QOO0O0O0000000 


C=11-D2DAR=A 
-Pil 


TST323 


Bt 


011672 


000340 
aodsbe 


011714 
003116 
003276 
003270 
120706 


003062 
000926 
011756 


Alt Te 


000024 
00 


003166 
003140 


003310 


000024 


ATIC TEST 
Sts PFs 


t$1323 


1$: 


3$: 


2s: 


4§: 





MACYL1 27(732) 
GOES DOWN - & 


j RERRASEEAERHEHEAHREESRESHERESAEHESERSHEEERERAESSESSHDSEREESEEARSRESENENE 
3 POWER FAIL TES DOWN - BIT13 SET 
jgueeshseesuesnesneanesneniceneeseenteneeaveantaneanesteateateastateasoes 


2 

(6)+, (6)+ 
83S, OPUVECS 
DWCSRA, -(6) 
SP, SAVES 
SAVES, SP 
(6)+ 
#120706, RO 
tbs (6)+ 
JWCSRA, RO 
#26, 0824 
42 


T-PF-G 





3 enn 10:45 PAGE S9 
T13 


haat POWER FAIL 

;SET FOR WINDOW TRAP 
WINDOW AND I/E 

els FOR B ieruet 


;LOCK tT rip 
;CLEAR THE STACK FROM THE PF TRAP 
j RESET UP VECTOR 


Wc 
T 


ON THE STACK 


WAIT FOR ne ee FAIL 


He Pe | 


; CHECK THE UCSRA 


; SKIP IF 


;WCSRA hot 120706 AFTER PF 


;SKIP_ WINDOW 


CLEAR STACK 

GET FoR TYPING 

; SHOULD NOT HAVE TRAPPED 
;RESET PF VECTOR 


; ASCIZ <15><12>"END OF TEST” 











BUS WINDOW STATIC TEST MACY11 27(732) 05-OCT-76 10:45 PAGE 60 


POWER FAIL TEST - PF - GOES DOWN - BIT13 SET 
000330 166774 


z 
§ 


ji< 
DZDAAA.P11 


oOo 
~~ 
3 





;NEITHER COMPUTER ENTRY - SECOND 


5 HERR EHR HEEHEHE HEHEHE EE HEEHE ELEE REEI EEE E EEE REE E EE EE EE EEE FEE 
st 3 POWER FAIL TEST - NO PF - STAYS UP - BIT13 SET 
(OPC 2° encase aa eae alee cap ana 


: 
8 


Seeces © 
Gunes § 
aoe 

fu 
Nad 


ue 


S 


Soe 
as 


RRS 
Ste 
ag 


8 
pas 
oO 
ha 


2 


REGO LS SBVERZGRH—BIsIend 2s S3SSG 
NOL 


rurururururururorurururururufururururfurururulrururururorur 
bs hme ae be bmn Dae fms Be fee fe fens Be ne ne ne ne ne =n He 2 fo 0 fe Pw Fe bo he Be Be 


YOCIQOOOOOVO0000000 
Ba ne hs ba fa Bae Be Oe fa hehe Gao pee poe fe 


rururururur 
baba hsp bho 


pope 
oO £r 
o- 
~ 

fu 
88 





;SET FOR POWER FAIL 
sLOCK I 

>SET FOR WINDOW TRAP 
;OPEN WINDOW AND I/E 
SWAT FOR _INTERUPT 
sRETURN FROM TRAP 


sLOCK IT UP 

sCLEAR THE STACK FROM THE PF TRAP 
sRESET UP VECTOR 

sSAVE WCSRA ON THE STACK 

;SAVE THE SP 

sWAIT FOR POWER FAIL 

i RESTORE T ra 


CLEAR STACK 
:GET @WCSRA FOR TYPING 
:1§ JWCSRA = 120706? 
:SKIP_IF OK 

tSWCSRA NOT 120706 
tRESET PF VECTOR 





MAINDEC-11-DZDAA-A 
ZDAARA. 


Oo 
bh 
fu 
es 
2 


rurururufururoruorury 


Sse sine 


2 = ban Pe oO be ae Pe pe 
WOnNMWU CWO 
££ 


fhurorororororrore 
ONOOOOOOOOCOOO0OO000000 
BAIS 


aS 
rane 
Re 


TST332 


104400 


01273? 
012737 


Oeeb26 
017700 
104000 
012737 





POWER FAIL TEST - 


012164 
000340 
Oleeetb 
000502 
012206 
002624 


002776 
000705 


002570 
co0d26 


BUS_ WINDOW STATIC TEST MACYL! 27(732) 
PF - GOES DOWN - BIT13 NOT SET 


5 REAARALRAERE RE LEALE LARA SAAR RELAELLA LAA EE AAERRALE LAE E EE ERLE ELLA ERELELELEL 


000024 
000026 
002674 
002646 


003016 


000024 
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; OWER FAIL T 
MIiiititiiiritiitiiiiiiitittitititittttiiiitrititttititiriittrtetisettery 


LOCK tr tp. 
CLEAR THE STACK FROM THE PF TRAP 
Pty UP _VECT 
; SAVE one ON THE STACK 


















EST - PF - GOES DOWN - BITI3 NOT SET 





;SET FOR POWER FAIL 
sLOC 


;SET FOR W 

: OPEN WINDOW AND. % "E 
:WAIT NER eee 
;RET URN 


; SAVE 
;WAIT FOR POWER FAIL 
; RESTORE THE SP 

T FOR TYPING 
oe THE WCSRA 


OK 
SRA NOT 706 AFTER PF 
P AREA 


TYPING 
ULD NOT HAVE TRAPPED 
RESET PF VECTOR 
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MAINDEC-11-DZDAA-A By S uIND 
DZDAAA. P11 1S7333 PORER sit TES - GOES DOWN - BIT13 SET 
e223 ¢ SRARRLARASASAR ALAA EAA ALAA RARER ARAL ALAA AA LALLA AAA LAA ARAL RES ALARALAEERLRE 
gee TEST 333 POWER FAIL TEST - PF - GOES DOWN - BIT13 SET 
= RELAREESEREA ASAE SLES RARE ERE TEASER HA ALERELE RTE RELER LAE FRELEL RHE RERELAKELES 
geeb 012244 104400 tST333: SCOPE 
gece 01 012737 012304 900024 MOV #15, 0824 sSET FOR POWER FAIL 
01 912737 000340 O000e6 MOV #340, a826 *LOCK IT UP 
2230 Oleeb2 012777 012346 O025S4 MOV #23, JWVECA *SET FOR WINDOW TRAP 
2231 gige70 12777 000502 O0eS26 MOV #502, aWCSRA OPEN WINDOW AND I/E 
2232 Oleo7b heey WAIT :WAIT FOR INTERUPT 
33 012300 000000 HALT ;RETUPN FROM TRAP 
2234 Ol 000776 BR -2 "LOCK IT UP 
2235 012304 022626 1S: CMP (6)+, (6)4 CLEAR THE STACK FROM THE PF TRAP 
223% 012306 012777 012326 02676 MOV #35 SPUVECS "RESET UP VECTOR 
2237 012314 017746 O02504 MOV WCSRA, - : SAVE WCSRA ON THE STACK 
2238 012320 O10667 002664 MOV ope gavee SAVE T 
2239 Ole32e% O00000 HALT WAIT FOR POWER FAIL 
2240 Ole326 016705 O02656 38: MOV SAVE6, SP SRESTORE THE SP 
2241 Ole332e 012600 MOV (6)+,. RO GET FOR TYPING 
2242 012334 120706 CMP #120706, RO “CHECK THE WCSRA 
e243 012340 OO14O! BEQ +4 “SKIP IF OK 
eoey Oles42 HLT *WCSRA NOT 120706 AFTER PF 
2245 012344 OO00404 BR rT 3 *SKIP WINDOW AREA 
2246 012034 Oe2b26 2s: CMP (6) +, (6)+ >CLEAR STACK 
2247 012350 017700 ooe4s0 MOV JWCSRA, RO ;GET FOR TYPING 
2248 012354 104000 HLT *SHOULD NOT HAVE TRAPPED 
ees 012356 012737 o00026 oo0024 4s: MOV #26, 0824 “RESET PF VECTOR 
2251 012364 000004 012370 TYPE ,.+#2 s.ASCIZ <15><12>"END OF TEST” 
ees2 012406 00000 HALT 


» 




















MAINDEC-11-DZDAA-A BUS WINDOW STATIC TEST MACYL! 27(732) OS-OCT-76 10:45 PAGE 63 
DZDAAA.P11 SCOPE LOOP HANDLER 
oe33 ; SSCOPE SCOPE LOOP HANDLER 
2255S sTHIS ROUTINE HANDLES THE ITERATIONS, LOOPING, ERROR 
2256 LOOPING, AND THE DISPLAYING OF THE TEST NUMBER. 
S52 "SCOPE" IS PLACED BETWEEN EACH SUBTEST IN THE TEST AND 
2259 "RECORDS THE STARTING ADDRESS OF THE SUBTEST IN “LAD:” 
1241 737 O40000 177570 TRAPS: BIT #SW14, JHSWR sLOOP ON TEST? 
sees BiSute Baiaae Bre ORTH iLO0e ON TEet IS 
2263 012420 OO0416 :SKIP = NOP FoR xo TIESTER 
2264 Ole42e 013746 o00004 MOV a#4,-(6) SKIP 384 ON STA 
2265 Oloves 012737 012446 oco004 MOV #4$'a84 ;SET FOR TIMEOUT 
2266 012434 005737 177060 TST 3#177060 :E ON XOR? 
2267 012440 012637 OO0004 MOV (6)+, 084 POP STACK INTO a#4 
2268 010444 O00422 BR SVLADS :NO ERROR - GO-TO NEXT TEST 
2269 Ole446 Oe2be6 4g: CMP (6)+, (6)+ *CLEAR K 
2270 012450 012637 OcO0004 MOV (6)+/ 084 : POP CBee INTO 84 
2271 012454 000430 BR KIT$ ERROR - LOOP ON TEST 
2272 O1e456 032737 OO4000 177570 3S: BIT #SW11, d¥SWR *KILL ITERATIONS 
2273 O01e%64 001012 BNE SVLAD$ *YES - KILL ITERATIONS 
2274 O1e466 105767 166307 TSTB —sCICNT#1 °F 
2275 O1e%7e 001404 BEQ 2s *BRANCH IF FIRST 
227 O12474 126767 OO0126 166277 CMPB «TIMES, ICNT+1 sDONE? ‘ 
2277 O1eS502 0010! f T$ BRANCH IF 
2278 O12504 11276 1 166267 ¢$: MOVB —s #1, ICNT+1 *FIRST ITERATION 
2279 OleSi2 105267 166262 SVLADS: INCB  ICAT *COUNT TEST NUMBERS 
2280 012516 O11667 166266 MOV (6) LAD *SAVE LOOP ADDRESS 
2281 pise28 016737 1662eS2 177570 MOV ICNT, JHDISPLAY DISPLAY TEST NO. AND ITERATION COUNT 
2282 012530 004767 000034 JSR PC, STRACE 
2283 012534 RTI s RETURN 
sce 1 7 1662 KIT$: INCB ICNT+ sINC THE ITERATION COUNT 
scee 1254, AOe583 1eP532 177570 Gens: NOV ICNT t sDISPLAY :SET UP DISPLAY 
Ea bi Seeq oOeree TBeo30 Te PC, STRACE FIRST ONE? 
2289 012560 ates BEQ EOP ADS : 
2290 OleSb2 016716 166222 MOV LAD, (6) iFUDGE RETURN ADDRESS 
2291 012566 000002 RTI FIXES PS 
5545 012570 032737 OOO40D 177570 STRACE: BIT #SW8, JHSWR ;CHECK BIT 8 
2294 012576 001001 BNE +4 SKIP IF TRACE 
2295 012600 000207 RTS PC RETURN 
22% Oleb02 OO00004 012606 TYPE +2 SCIZ <15><12>"e" 
22357 Oleble 116705 166162 MOVE {CNT, TTY GET BYTE FOR TYPING 
2298 012616 042705 177400 BIC #177400, TTY CLEAR JUN 
2293 Ol2622 000167 001760 JMP PRINTS TYPE IT 


e301 Ole2626 000001 TIMES: 1 ;RUN 1 TIMES 





MAINDEC-11-D2DAA-A 


DZDAAA.P11 


ests Bleese 


2309 Ole702 
2310 012706 
2311 O1e710 
e312 012714 
2313 012752 
2314 012760 
e315 O1e764 
316 012766 
2317 012770 
2318 012776 
2319 013002 
2320 013010 
2321 013014 
2322 013016 
e323 013020 
2324 013026 
2325 013030 
2326 013032 
2327 013062 
2328 013064 
2329 013066 
2330 013066 
2331 013104 
2332 013110 
2333 013114 
2334 013124 
2335 0131c6 
2336 013130 
e337 013132 
2338 0131 
2339 013144 
2340 013150 
2341 613152 
este 013154 
2343 013160 
ea 013162 
| Bee B13172 
2347 013174 
2348 013176 
2349 013204 
2350 013210 
2351 013214 
2352 013216 
2353 013220 
2354 013202 
2355 013204 
2356 013226 
2357 013230 


aie 


BUS WINDOW STATIC TEST MACY11 27(732) 


SUBROUTINES 


Bisae Gigbes "Rov 


2 Oe a0 B00 54 
340 OQ00036 
014416 000030 
000340 000032 
001364 
012720 
Ole766 o00c04 
040 
164000 002026 
000004 
013016 000004 
902010 
000020 001776 
013036 
013072 
001714 
001462 
013120 
013126 oooco4 
003660 
015026 
015044 
013172 Od00004 
001630 
001624 
001664 


15: 


7$: 


6S: 
cs: 


SETe: 


31S: 
32$: 


60S: 


20S: 
21S: 


S4$: 





eienbos, WCSRA 


ast at 


SET2 
(6)+, (6)+ 
20, CSRA 


Bs 
»-*2 


1$ 


+2 
HESRA, TTY 
PC. PRINTR 
42 
325 


(6)+, (6)+ 
#315084 
miDaRA o 


a (1+ 
#VECA, RI 
60$ 
#205, 084 
21$ 


(6)+, (6)+ 
#-1, SWRARA 
JWRARA, RO 
RO, SIZE 
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;LOCK UP 4 
;SET UP _IOT VECTOR 


LOCK_UP 
Set TRAP VECTOR 
:SET EMT VECTOR 
; CHECK ONCE ONLY SWITCH | 


J 
:SKIP IF NOT FIRST TIME 
BC 12 (15) (12) <12)°MAINDEC™11-DZDAR-A<15) 12> 12> 
315 THE ADDRESS LEAGAL 


CLEAR STACK 
ist nar FOR SCANNING 
SET FOR TIMEOUT 
i18 IT DSR E? 

LFPoe SF T OUT 
cr AR STACK 
; BUNP ADDRESS 
;DEC COUNT 
LOOP UNTIL FOUND 
ROCK “WCSRA NOT FOUND"<15><12>< 12> 
TRY IT AGAIN 


3:ASCIZ “WCSRA 

TYPE WCSRA IN OCT AL 
; TYPE LEADING ZERO’S 
;.ASCIZ “ 


;SKIP 

Pg panes TIMED OUT 
sSET 4 POR TINEOUT 

:GET THE FIRST ADD 

GET TABLE ADDRESS 


;ADD 2 
;GET THE DATA 


+ EOOP_UN TIL_ DONE 
sb ,T {neu RETURN 


sHINDOM IS NOT AT THIS ADDRESS 
;CLEAR TACK 

sFIND THE WINDOW SIZE 

SAVE THE SIZE 

:SAVE THE SIZE FOR POSTERITY 
;BUMP IT TO 1 BIT ONLY 

:GET UPPER BITS 

;MOVE IT INTO EOSITION 
sc OFFSET 


;YES - GET OUT 
;COUNT BITS 












DZDARA 





013232 
013236 
2369 013240 


O1Sece 
013256 





Rone 2326 


a 


G&® 
ul 
wn 
fT 


2364 Ql 
Sas 013304 
236 13310 
236 13314 
2368 013320 
2369 013322 
2370 013326 
2371 013330 
e372 013332 
2373 013336 
2374 013340 
2375 013342 
2376 013346 
2377 013350 
2378 0132354 
2379 013362 
2380 013366 
2381 013372 
2382 013400 
2383 013404 
2384 Oi3410 
2385 013414 
2386 913416 
2387 013420 
2388 013426 
2389 013434 
2390 013440 
2391 013444 
2392 013446 
2393 013450 
2394 013452 
2395 013454 
e396 0134 
2397 Ol 
2398 O01 
01 
01 
01 
O01 
01 
01 
01 
0} 
01 
01 
O01 
ot 
1 
O01 
01 


ERBSeRaes 


wae 


pee 70} 


ooocde 
015106 


000005 
001474 


00iS00 


000006 
001254 


001734 438: 


SET3: 


ooooc4 
156700 
47$: 


156736 
156662 


57S: 


001334 
156560 


34S: 
000004 5SO$: 


BUS WINDOW STATIC TEST MACY11 27(732) 
SUBROUTINES 








#2,R1 

54$ 

WIND(1) , SIZ 
R1, OFFSET 
512 


+2 
JWADRAX, RO 


3 
@WADRAX, RO 
RO 


RO 
RO, ie 
PC ,PRINTA 
#245 9 

ceo 
atSaR 0 
4771106, ,KIPDRO 
sKIPOR2,R1 
Saas t1)+ 


47g 
#7600, KIPAR? 
#77406, KIPDR7 


Rt 70000 RO 
RO, KIPAR2 


#4 Ro 
aKtPrR, Rl 
0,RO° 
RO. 00 Re 
Re’ 
#40000, WADRA 
KIPOR, KIPDRI 
KIPAR2, RI 
aia Ri 
PARI 
oF 
(6)+, (6)+ 
#6, 084 
AWVARA, RO 
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i SOP COUNT 
:GET * eaee 
isin Se THE RiINDOW i. 
SCIZ “K WINDOW 
GET WINDOW ADDRES a 
;CLEAR MEMORY MANAGEMENT FLAG 
;GET READY TO TYPE 
;INIT COUNT 


;MOVE IT LEFT 
;PICK a> sanediiees BIT 


LOOP UNTIL O 
;GET AGAIN 
ist FOR 







TYPING 
save an, alte ADDRESS 
; TYPE RO MX AS 18 BIT ADDRESS 
:GO0_TO RDO PRINTER 
OUT TRAP 


i CHECK COUNT 


*LO0 

: MAP TO BANK 37 

; READ/ WRITE 4K 
FLAG 

GET PODRESS 

s MAKE 

sIT 

; PAGE 

ADDR ESS 

CLEAR JUNK 


CET THE COUNT 
;GET ays a 


CET IN THE ADDRESS 
: COUNT 


; LOOP 
FUDGE ADDRESS 


RESTORE STACK 
sRESET 4 
;GET VECTOR ADDRESS 








AN a | meat 


DZDAAA 
414 


Peery rpryrryryrrprurryrurereronryrer TD 
tues sesssees tenets 


QOOOOOOOODOOO OOO OOO OOOOH OOOCOOVOHOOOOOOSOOOOOOOGCOD00200000 


BR 2b 2B = b= OF Bb Oe eb bb mt bh be be ee bh es Fb ee fat bh ee Bo Pe hs pe fs foe bot fe ae Pie fee Bo pe 


2 p= fe fe 9 pe pe fe 


& 


S388 


SaNSRERS 


Toa 


23 


Bis 


Bes 


5 
bs fe 
oco 


BRE 


F 


oO 


RERERREIER 


S$ 


£££ 


2BRR 


012737 


Bus WINDOU STATIC TEST MACYL1 27(732) 
SUBROUTINES 


000006 00004 © 
013576 


001000 
000136 


015072 
014026 


177777 
001016 


000004 


090004 


001022 


001104 


ess: 


SET4: 


308: 


118: 
108: 


12$: 


138: 
143: 


SET6: 


16S: 


#6, 084 
+2 
$iodo,RO 
25$ 
#136,RO 
SET4 


SETI 
RO, WVECA 

RO, WWECA+2 
aWVARA, TTY 
PC, PRINTS 


° 2 
RONEB1, (6) 
30$ 


#20 
st RO 
RO, UCSRB 


WCSRB, TTY 

PC, PRINTR 
42 

1O$ 


(6)+, (6)+ 


RO. (1 

aVECB, RL 

138,304 
14$ 

(6)+, (6)+ 


#-1, JWRARB 
SURARE, RO 


WIND(1),SIZ 
SIZ 


* +e 
SWADRBX, RO 
MX 

#5,R1 
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iReee q 


.ASC CTO 
: CHECK FOR UNDER 1000 
OR ROU 


N RANGE 
VECTOR 5 ye BETWEEN 140-776 
$ SAVE. THE VECTOR ADDRESS 


;SET UP a ats 
STYPE SWVARA IN OCTAL 

: AND slPREss LEADING ZERO" S 
j aASCIZ < 15><1l2> 

;ONLY 1 ADDRESS NEEDED? 

NO - CONTINUE 


;GET STARTING ADDR OF “A” REGISTERS 
;DETERMINE START OF "B” REGISTERS 
CLEAR UNWANTED CARRY 

i] 


;:ASCIZ /WCSRB = 

;TYPE WCSRB IN OCTAL 
; TYPE LEROING ZERO’S 
;-ASCIZ / 


;SKIP IT 

;"B" WINDOW ADDRESS TIMED OUT 
RESTORE STACK 

SET 4 FOR TIMEOUT 

GET THE FIRST ADOR 

GFT TABLE ADDR 

;LOAD “B” ADDRESS 


+ EOOP UNTIL _DONE 
al TIMEOUT RETURN 


;WINDOW IS NOT AT THIS ADDRESS 
j RESTORE STACK 
;F IND 3 WINDOW SIZE 
;SAVE T 
"ir TQ ONE BIT ONLY 


ar 
IT INTO POSITION 
HINT FOR R OFFSET 


KEEP COUN 
;GET THE sift 
WINDOW 


SINIT COUNT 
















MAINDEC=11-D2DAA-A8 BUS WINDOW STATIC TEST MACYLL 27(732) OS-OCT-76 10:45 PAGE 67 
DZDAAA.Pil SUBROUTINES 
2470 O14140 098300 178: ASL RO sMOVE IT LEFT 

71 O14l42e OO6167 Oc00ES4 ROL My. ‘PICK UP DROPPED BIT 
e472 014146 §05301 DEC R} “COUNT IT 
2473 014150 001373 ‘ 178 ‘LOOP UNTIL O 
es74 014152 017700 OoCO7Oe MOV SWADREX, RO :GET RODRESS AGAIN 
2475 014156 006300 ASL RO ‘POSITION FOR 
2476 914160 906300 asl RO : TYPING 

77 014182 010005 MOV RO, TTY *TYPE RO WITH MX AS 18 BIT ADDRESS 
2478 oivig4 O04767 oOo4He J5R. PC; PRINTA GO TO ADDRESS PRINTER 
e479 914170 O:7700 oodEe7e MOV aWVARE, RO ‘GET THE B VECTOR 
2480 014174 900904 014200 TYPE +2 :.ASCIZ “VECTOR = / 
2481 O14216 017705 O00644 MOV SuVaRE TTY :TYPE OWVARB IN OCTAL 
2482 14222 004767 000360 JSR PC, PRIATS “AND SUPRESS LEADING ZERO’S 
2483 014226 000004 014232 TYPE .42 .ASCIZ <15)<1e> 
e484 914236 bee700 001000 CMP 81000,R0 Check F 
e48S O14242 BLT e7s sERROR IF OVER 1000 
466 Sises4 22700 000136 CMP $136, RU :CHECK FOR UNDER 136 
e487 014250 O0c401 BLT 285 *SKIP IF UNDER 140 
2488 014252 900000 278: HALT *ADDRESS NOT 140-776 
2489 014254 010067 000612 288: MOV RO, WVECE *SAVE THE ADDRESS 
2480 014260 005720 TST (O%+ : 
2491 O14262 010067 MOV RO, WVECE+2 :SAVE THE STATUS ADDRESS 
2492 bobs ble?s? oocoo4 SETS: MOV 86) a84 RESTORE 4 
e493 014274 Ol 76 - MOV 8476, SP ;RESET SP 
249% 014300 O0S067 164504 SETI: CLR LAD :CLEAR THE LOOP ADDRESS 
2485 614304 005067 164470 €LR ICNT :¢ ¢ 
24% 014310 016777 O00S32 o00Szt MOV WVECA+2, DWVECA LOCK OUT DAL! TRAPS 
2487 014316 005077 O00S524 CLR DVECASE HALT S 
2498 (914 016777 Oo0s46 ooos42 MOV WVECB+2, JWVECB LOCK OUT OTHER ADDRESS 
2499 (014 005077 0005 CLR DWVECB+2 *HALT ADDRESS 
2500 O14 012737 000006 000004 MOV 4 *RESET 4 
2501 O14N2 005767 000536 TST FLAG :MM IN USE? 
2502 O01 001403 ; BEG 3$ *NO = GET OUT 
2503 014350 012737 000001 177572 MOV #1, a8SRC :TURN IT ON 
eon 014356 000207 38: RTS PC : RETURN 
2506 
2507 014360 012704 000020 TIMO: MOV #20,R4 sSET COUNT FOR DOUBLE LOOP 
2508 014364 O0S00s 1$: CLR RS *ZERO COUNT 
2509 014366 032777 010000 090430 2S: BIT 810000,aWCSRQ :CHECK FOR NEW DATA B 
2510 014374 901401 BEQ 3$ :SKIP IF NOT SET 
2511 14376 000207 4S: RTS PC * RETURN 
2512 O14400 O0Se0S 38: INC RS *BUMP COUNT 
2513 O14402 001371 BNE 2s “LOOP IF NO TIMEOUT 
2514 O14404 605304 DEC RY *DEC OTHER COUNT 
2515 O14406 001366 BNE 1$ "LOOP IF NO TIMEOUT 
2516 O14410 011690 MOV (6),RO *GET THE ADDRESS 
2517 O144le 104000 HLT 3;NO TIMEOUT 
esie S!4414 900000 HALT 





7 





PLeeeee 
PRslakne fins 


di 
o 


& 


st: 


OOOO NOKOO0000000 


Pb Dd 2 hh = & > B-+ & 2 ~~ He Be 


GSUEEEED 0 82 


: 


9 WINDOW STATIC TEST MACY11 27(732) 
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T ROUTINE (ERROR TYPEOUT) 


177570 
177570 


164322 
000036 


GO00032 
177764 
000040 
000012 


SHLT ERROR TYPEOUT HANDLER 


; THIS ROUTING PRINTS, OUT ERROR MESSAGES STARTING WITH THE 
SS IT COUNTS THE NUMBER OF ERROR 

: AND HAS the THepabturty OF LOOPING ON ERROR, BELL ON ERROR 
N ERROR, AND INHIBIT TYPEOUTS. AN OPTIONAL 
 (HLT#3) WILL BE’PLACED IN “HLTCTS:” FOR ATOITIONAL TYPECUTS. 


EMT$: BIT #SW10, J8SWR ;BELL ON ERROR? 
BEO 1$ :NO = SKIP 
TYPE BELL RING BELL 
1S: INC ERRORS :COUNT THE NUMBER OF ERRORS 
SIT 8SWi3, a8SWR :SKIP TYPEOUT IF SET 
BNE 2s : SKIP TYPE 
TYPE +2 i sAOClZ <15)<12> 
MOV 6) HLTAOR :PUT ADDRESS OF INSTRUCTION ON STACK 
SUS fi TADR :FUD ss 
MOVB  @HLTADR,HLTCTS :GET HLT ARGUEMENT 
MOV TADR, tT ;TYPE HLTADR IN OCTAL 
JSR FC, PRIATR > TYPE LEADING ZERO’S 
TYPE .42 *.ascIz" * 
JSR PC ROUTIN *GO TO USER ERROR ROUTINE 
2s: TST aes *HALT ON ERROR 
BPL +4 ?SKIP IF CONTINUE 
HALT HALT ON ERROR! 
RTI * RETURN 
HLTCTS: O “HLT ARGUEMENT 
ROUTIN: 
MOV RO, TTY sTYPE RO IN OCTAL 
ISR PC’ PRINTR *TYPE LEADING ZERO’S 
TST HL TCT$ *CHECK FOR 2 WORD TYPE 
BEQ ‘RETURN IF O 
TYPE TYPE A SPAC 
MOV Al, TTY TYPE R1 IN OCT 
JSR PC’ PRINTR AD 
1S: RTS PC 0 





ARGUEMENT 








- 
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MAINDEC-11-DIDAR-A 
OZORAR.P11 CTAL DUMP OF A WORD 8 18 BIT ADDRESS TYPER 


om 


3557 : SUCTAL OCTAL TYPEOUT ‘ROUTINE 
2559 ; THIS ROUTINE IS USED TO TYPE AN OCTAL NUNBER ON THE TTY. IT WILL TYPE 
2559 [ALL & CHARACTERS, SUPPRESS LEADING ZEROES, TYPE AN 18 BIT ADDRESS, OR TYPE 
2581 :THE 16 BITS. IT [S CALLED VIA THE DUMP, SOuMP, DUMPI8, OR BITYPE MACRO'S. 
Bae eS OSG 912767 170101 o00202 BITYP$: MoV #170101, .PR :SET BIT FLAG ANS 16. CHARACTER COUNT 
2564 O01 000411 .PTIT :NOW TYPE IT IN BIT FORM 
2565 014576 112767 000001 000172 PRINTR: MOVE &1,.PR ‘SET ZERO FILL SWITCH 
2585 O14604 900402 R +6 : 
2567 014606 O0S067 000164 PRINTS: CLR “PR :SUPRESS LEADING ZERO’S 
2568 Ol46le 112767 177?7e 000157 MOVS = #-b, .PR+1 :SET COUNT 
2569 014620 O10446 .PTIT: MOV RY, ~(6) SAVE RY 
2570 Ol462e2 O1e704 015000 MOV #.PR+2, RY ‘SET POINTER TO FIRST ASCII CHAR. 
2571 014626 105014 CLRB (4) :CLEAR FIRST BY 
2572 014630 000432 BR . PRE ‘ROTATE FIRST BIT 
2573 O1463e C10446 PRINTA: MOV RY. -(6) :SAVE RY 
2574 014634 612704 015000 MOV #.PR+2,R4 :SET UP POINTER TO OUTPUT AREA 
2575 014640 116714 SOOIS6 MOVB = MX, (4) :MX CONTAINS UPPER S BITS 
2576 O14644 006305 ASL TTY GET RID 
2577 O1464%6 006305 ASL TTY 0F 3 
2578 O14650 006305 ASL TTY : JUNK SITS 
2579 O14652 1ne3i4 A (4) :GET BITI3 
| 2580 014654 O0600s ROR TTY PACK IT 
| 2581 O1¥656 1062014 (4) GET BITI4 
2582 014660 O0600S ROR TTY PACK IT 
2583 014662 152724 O00060 BIS8 80, (4+ ‘MAKE IT ASCII 
2584 O1¥b66 012767 175401 000102 MOV #175401, .PR 7=5,.1 - 5 BYTES AND FILL 
2585 914674 105014 _ PRL: CLRB (4) CLEAR BYTE OF CHARACTER 
2586 014676 032767 000100 000072 BIT #100, .PR ‘BIT TYPING MODE? 
2587 014 001004 BNE . PRE YES - SKIP 2 ROTATES 
2588 014706 006105 ROL TTY “ROTATE BIT INTO C 
25839 014710 106114 ROLB (4) ;PACK IT 
} 2590 O14712 006105 ROL TTY :ROTATE BIT INTO C 
| 2591 014714 106114 ROLB ss (4) :PACK IT 
| 2592 014716 006105 .PRF: ROL TTY *ROTATE BIT INTO C 
| 2593 014720 106114 R (4) *PACK IT 
| 3594 O14 105714 TSTB (4) 1S IT ZERO? 
| 9595 O14 001 +6 *SKIP INC 
| oe piss {beste OOOO ie SBR heck FILE Sui TCH 
| 3598 Bivese bolas REQ 46 :SKIP BITSET 
| 2599 014740 152724 o00060 BISB #0, (4) + >MAKE INTO ASCII CHAR 
| p00 O14744 105267 000027 INCB PRL INC COUNT 
| 601 014750 001361 “PRL * REPEAT 
014752 04 015000 CMP #.PR+2,R4 sEMPTY BUFFER? 
| p603 O14 001002 BNE + *SKIP IF NOT 
| 2604 O14 112724 000060 MOVB 80, (4) + *LOAD 1 ZE 
| 3605 O14 105014 CLR (4) *NULL TERMINATOR 
2606 014766 015000 T .PR+e TYPE IT 
2607 O14772 012604 MOV t6)+,R4 “RESTORE R4 
2608 014774 O00207 RTS PC : 
2603 014776 O0COle PR BLKW ole ‘COUNT, SWITCH, AND OUTPUT BUFFER 
Oisoe2 000000 0 “MEMORY EXTENSION BITS 


HS 
ro 
o 





Fo 
3 
pS 
& 
a 
B 
D 


i 


RR 

OO IOUT £ WITH 

rantatatatotatap at 
SRB 


SNSREREGER Heese 


aes Be 


REAM EATS Ae 


eeerssssssssrsrerrere preeses=se eeeecoD[Se 
~ 
SREB 
—— 
-— 
see 


5 


$9 Bs Gos & 2 b+ = oF he pie Pee Oo Pn Ba He 
—O 


S2ESREHSRER 


UU UR UTC UT UTIUT UU UU 
SEE 
Ne 


oes 
be esac 


Rg 
wo 























BUS WINDOW STATIC TEST MACYL! 27°732) O5-OCT-76 10:45 PAGE 70 
WINDOW ADDRESS TABLE 
WCSRA: 164000 sCONTROL 3 STATUS REG. (R/W) - WINDOW A 
WOBRA: 164002 ‘OUTPUT DATA BUFFER <R/W) 
WOBRB: 164004 ‘INPUT DATA BUFFER (R) 
WOARA: 164006 “DISPLACEMENT ADDRESS REG. ‘R) 
WRARA: 164010 "RELOCATION ADDRESS REGISTER (R/W) 
WADRAX: 164012 “WINDOW ADDRESS REGISTER (R) 
WVARA: ieuo1s “VECTOR ADDRESS REGISTER (R) 
000302 WVECA: 300,302 : VECTOR ADDRESS 
WADRA: 20000 WINDOW ADDRESS 
WCSRB: 164020 ;CONTROL & STATUS REG. (Rew) - WINDOW B 
WOBRBX: 164022 :QUTPUT DATA BUFFER (R/W 
WOBRAX: 164004 ‘INPUT DATA BUFFER (R) 
: 164026 “DISPLACEMENT ADDRESS REG. (R) 
: 164030 sRELOCATION ADDRESS REGISTER (R/W) 
WADRBX: 164032 W ADDRESS REGISTER (R) 
WVARB: ieu034 VECTOR ADDRESS REGISTER (R) 
000306 WVECB: 304 306 CTOR ADDRESS FOR WINDOW B 
WADRS: 4000 HY NDOW ADDRESS FOR B 
SIZE: 0 sWINDOW SIZE 
DISP: 9 s 
FLAG: 0Q ;MM FLAG 
O30440 031040 WIND: .ASCII ”.5 1 2 4 81632" 
034040 033061 
176009 176000 ADR1:  176400,176000, 176000, 174000, 170000, 160000, 140000 
170000 160000 
003000 003000 ADR2:  1000,3000, 3000, 13000, 33000,73000, 173000 
033000 073000 
000030 000030 ADR3:  10,30,30,130,330,730,1730 
000330 000730 
MM: 0 sMEMORY MANAGEMENT FLAG 
OFFSET: 0 
000000 Siz: 6,0 
ONCE: -1 ONCE ONLY FLAG 
SAVE6: O “FOR SP 
ooo026 PUVECS: 24,26 *POWER UP VECTOR ADDRESS 
SRO= sKT11 - MEMORY MANAGEMENT 
KIPARO= 172340 
KIPORO= i 
KIPARI=1 
KIPOR1=17 
KIPAR2=s 172344 
KIPDR2= 172304 
KIP. 172346 
KIPDR3= 172306 
KIP 1722356 
KI 172316 
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DZDARA.P11 WINDOW ADDRESS TABLE 





2667 017440 2 17440 
Spee 017440 o00005 OPEN: RESET :ZAP THE WORLD 
2670 O17442 Ole706 000500 MOV #500, SP s INITJALIZE THE STACK 
go71 bizwé 012767? 177777 175532 MOV 8-1. ONCE I 
Ses Gime? ares jus ek Retain He haste 
2674 SIE a ooeS 0046 MOV RO'B 
2675 017472 Ol2e710 ooo4de MOV nite, a) —ae THE WINDOW 
2676 017476 000777 BR.: BR :WAIT 
2677 Beas 000240 NOP 
2678 017502 000240 NOP 
2678 017504 O000240 NOP 
2680 017506 000240 NOP 
2681 017510 oo0e40 NOP 
e682 017512 005077 oD0022 CLR aBR. 1 :CLEAR WCSRA 
2683 017516 012701 O00100 MOV #100,R1 
2684 017522 20$: CLR RO WAIT 
2685 017524 103: DEC RO re, FORE 
2685 017526 001376 BNE 10$ : STARTING 
fe tise Sy _ 

q 
2689 pi zeae en 003410 IMP DSBEGIN SELF START 
ge30 017540 ocod0o BR.1: 0 
2692 000001 END 


ead 
é 
| 


ll 
DZDARA.P1i 
AOR  o1S124 
aDRe  olSi4e 
ADRS O15160 
BEGIN 003410 
BELL = O00C07 
SITYPS O14S66 
BR. 017475 
Bncaor phgs40 
CODE:  o00700 
DISP 015102 
DISPLA= 177570 
DONE 010330 
EMTS O14416 
ERRORS 001002 
FILCHR 010550 

015104 
GETCOR 900514 
GO.HST Breese 
GO:NEL 011352 
GO.NE® 011776 
S0.0TH 011060 
HLT = 104000 
| 
| 
i 
| HLTADR 001012 
'HETCT§ 014534 
| ICNT 001000 
| {gts 10402 
id 172380 
i KIPARI= 172342 
| KIPAR2= 172344 
KIPARS= 172346 
| KIPRR = 176356 
KIPDRTe 172300 
| KIPDRe= 172304 
KIPOR3= 172306 
| KIPDR7= hrsale 
KITS 19536 
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DZDAAA.P11 CROSS REFERENCE TABLE -- USER SYMBOLS 
15022 2366 2369 2468% c47i% 2575 26108 
0 4278 l 5 582 616 6e08 650 6S4s8 684 688s 
878% 947 9Sis 9948 1004 1008s 
10528 10808 11248 1209 12138 1247 {2eS1# 1281 12858 1387 
13918 es 14298 = =14$7 14618 1486 14908 1508 Siew 1518 {Sees 15508 1552 
1SS6# 1581 iSsSe 1609 16138 1653 16578 1731 17358 =§=1770 17748 =§=61799 18038 
1819 18238 1832 18368 186 18658 1874 18788 1882 16868 1892 16968 19618 
964 19688 1992 19968 e20els 2023 20278 2050  2054# 20798 2081 e0ss# 2109 
2ell3# 2137 el4i# 21678 el6 21738 196 22008 e389 eee7 8 
3 2361% 24 26498 


ny 
z 
x NS 
J i) 
OO 2° 
~Jj 
rm 
“UT 
mw 
uc 
a 
“JUT 
or 
@ 
e 
~“I 
re 
uco 
= 
cou 
Our 
mu 
ae 
oo 
oO 
nn 
Sd 
coun 
“100 
co 
* 





1 
336 1394 §=14e4% 1432% 1451% 14S6% 1463% 1483 1492% 1514% 
15i6# 1Se6e 1540% 1661% 1668% 1675% il682# 1689% 1696% 1703% 1710% 1717% 172e4% 
6* 176e% = 1775% * 1790% 17938 1804%  1807% 1809 1811% 
1813 18e4* 1837% i84ee 18662 1879 1887% 1897% i1900% ee82e  2c87% 
hte e4ebe 9 2437% e478% e482 eSO4e 2511% 2538% 2540*% 2550% 255S* eS56*  ecb08* 
001004 S068 1903 1904 
PRINTA Q14632 2377 Ss e478 25738 
14576 2437 = 2538 essS 25658 
PRINTS 014606 e4e6 8 e482 = 2678 
= 43i8 (Silex 95ee (997% 112e6* 1524 1659 1991% 2108  2136% 
PUVECS 915ele # 2036 2063% ecO94* eleee e150* e182 c209% e236% 26538 
= Site S488 S82e 6168 650 684 7ele 867618 8018 8748 9478 10048 10488 
® 11s 1135 11368 =1142 11438 =61149 11508 1156 11578 §©1163 11648 1170 
11718 311 11788 =§61184 11858 1191 11928 61198 =6.11998 =. 1209 1215 12168 1218 
12198 iss lee7s 861234 15358 le4e 12438 12478 1253 812548 1256 12578 1268 
1e698 = 1271 levee 12818 1 1ee8e 12099 13008 1324 13258 1336 13378 1352 
13538 13878 1394 13958 §61424 14eS# 1432 86143938 ©6145] 14Se8 1456 14578 = §=61463 
14648 1483 14848 8614868 82 14938 15088 1514 15158 15188 1526 1Se78 1540 
1IS4is iSSee 15818 16098 16538 1661 l66ee 1668 16698 1675 16768 1682 6838 
1689 16908 16% 16978 1703 17048 = §=1710 17118 =61717 =.:117188 = 1724 172eS# = =617318 
1736 17378 =61733 17398 §61746 17478 = =1754 17558 1762 1763 17708 1775 1776 
1777 1 1790 17918 1793 17948) =617998 = 1804 180S# 1807 1g08% i809 18108 
1811 18ies 1813 iei4e 18198 1824 leeS# 18328 1837 18388 2 1843¢ 18618 
1866 18678 a 1673 8808 i68e8 1887 18888 18928 1897 iss8# 1900 19018 
R = oooi00 ‘fia Give ‘gee eee Oss Blin Gi7s G5ae Gee 6308 ok oes 
th 8 aes 11348 2 11418 = = 1143 11488 1150 1ises 115 ll6e# 1164 
11698 81171 11768 = =61178 11838 1185 11908 16638 166 16708 16 16778 =§=©1681 
ies4e 1 s63i8 1695 16988 1702 170S8 1709 i7les = 1716 17198 
REGSCN 000562 4748 = 484 267 
ROUTIN 014536 eS40 8 86 2S488 
| RO =7000000 4358 464s 4 Sel 
Su4# 8645 S66# 
S94 607 
# 635 
75 680% 
770% 86771 
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DZDRAR. P11 CROSS RE ABLE -- SYMBOL 
TSTele 010204 18648 
TSTel3 010242 18778 
TSTel4 010262 1885s 
TSTelS 010302 1958 
TST3 polsoe Sess 
TST301 haat 19678 
ST 010714 19958 
TST311 011066 e026% 
TST3le 011206 20538 
TST321 011360 2034s 
TST32e2 011504 elles 
TST323 011632 21408 
TST331 012004 el7es 
TST332 Ole124 21998 
TST333 O12244 e226 
ST4 001434 619% 
STS 001562 6538 
TST6 = «001710 6878 
TST? 002044 7248 
TTY =00000S “418 1814% 1815 1928 1929 1930 1932 1933% 1934 1936 i944 19S52%  1953% 
1954 195S* 2297% 2298% 2331% 2376% ec425* c436e 2477% 2481% 2537% 2549 eSS4 
eS76% 2577% 578% 2580% 258ee e2588% 2590% 2592 
TYPE = 000004 4308 992 1907 2019S e077——«i2'ESssé22S 1 ee% «= ele = e3es—(isi2s—si2D—Cié2P? 
can e415 e427 8684350438 SHES HEC (assis Gs HB S29) 5330S S39 Ss eSB 
WADRA 015050 1289 1301 1314* 1326% 1338% 1359 1382 1403 1413 1419 1441 1464 1471 
1493 1515 2375% e2403% 26208 
WADRAX 015036 S 2364 #2372 2390 eblb% 
WADRB 915076 26318 
15064 67 e474 26278 
WCSRA 015024 S25# 2) S31# $32 S37% 538 Suge S44 806 812% 818%  S824# 
830% 836% # 842% 848% 854% 860% 866% 872% 886 8 904 
910 916 922 928 34 940 946% 955% 957% 979% 
999 1009* 1010 1011% 1012 1021% 1022 1031# 2 1041% 1042 1047% 1127 
1129 1134% = 1136 1141% = 1143 1148% 1150 1155* 1157 1l62% 1164 1169% 1171 
1176# 1178 1183% 1185 1190 1192 1197% 119 1204* 1205 1214* 1217% 1225% 
1e33% 1e41% 1eSee 12e55* 1e67* 270% 1286% 1293 12e98% 1303 1308 1323% 
1330 1335* 1340 1345 1351% 1364 1371 1393% 1408 412% = =1423% 1431% 
1445 1449 1450% 1455% l46e% 1482e% 1491% 1513% 1525* 1531 1$39% * 1558 
1563# 4 1569% 1570 1575* 1576 iSs0* 1660% 1663 1667% 1670 1674% 16 
1681% 1 1688% 1691 1095* 1698 1702% 1705 1709* 1712 1716% 1719 1723% 
17, 1737% 1745 1753%  1761% 769% 1776% 1789% 179e% 1798% 1806%  1808% 
isis jeeie ieoge jess 1501x 97x 1s7@ 1903 2o0ge 20ge 204 2031 2037 
34> by 4 74 $3858 eae ips iim ele3 131 el4s*e 2151 
el77# 2183 2191 2ee04e 2210 e220 ee3l# 2237 ech? 2314 e3l7# 23 2323% 
2331 2338 8 8=6e431 esog9) Ss bl 1s 
WCSRB 0150Se 5S4 S59 560 S65* 566 S71% 572 577 578 807 813 819 82S 
eat 837 843 849 85S 861 867 873% 879% 885% 891% 897% 903% 
909 31S# 921% 927% 933% 939% 945% 956% 961 965* 971% 980 986% 
e4s4# 2436 e443 e26c28 
WOARA 015032 1383 1414 1850S eb l4s 
WORRB 015060 2625s 
WOBRA 015026 588 $93 594 599% 600 605* 606 611% 612 661% 667% 673% 679% 
1053% 1054 1059% 1060 1065* 1066 1071% 1072 lel6* leede ilesee le4de led4e 
1257 1269% 1272 1586* 1587 1s92e 1593 1598% 1599 1604 1605 1744 = 1 752% 
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1760e 176g 1783 178i Vane 4734 e339 Ss eb les 

WOBRAX 015056 6 6 6 674 68 6248 

WOBRB 015030 690 696 702 708 714 1219 1227 1235 1243 lete 1277 1739 1747 
1755 1763 1778 =—s_- 26 138 

WOBRBX O1SCS4 ona apse 628 633% 634 639% 640 645% 646 695% 701% 707% 713% 

WIND 015106 2360 e464 26368 

WRARA 015034 728% 729 737% 738 746% 747 755% 756 1086* 1087 109S5* 1996 1104% 


1105 113% = =1114 1119* 1392% 1430% 1619% 1620 1628% 1629 1637 1638 1646* 


WR rats 768% 769 777% 778 786% 787 795% 796 «= 24#S3% =—24S4 2626% 
0 48 

WVECA 015044 953% iSe3e iS5e%* 1535% 1536% 1971% 1999% 2030% 2057% 2088% e116 el44e 2176+ 
2203 e2230% e342  ec4eee e4e4e 2496% 2497% 26198 

WVECB_ 015072 954% e447 e2489% ec491% ec498% 2499%  ecb30# 

STRACE 012570 2e82 386228? 22938 

, = 017542 444¢ = «44S 446% 45S# 469 486% 493 497 S0e# See S28 534 S4C 
S46 SS6 S62 568 S74 590 596 Oe 608 614 624 630 


2676 ; 
-BIT = 166900 3708 8 377 378 379 380 381 382 383 384 385 e261 e227 2531 









2544 
-PR 014776 Bas eS6S*  2567# e584 
-PRF 014716 eS7e 48=—s 2S87 Ss 2592 
-PRL 014674 e5858 2601 
-PTIT 014620 eSt4 e2S69# 


-TYPE 010552 1932 1933 19598 
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DZDAAA.P11 
BITYPE 1s 
BLKBLK le 
BUFHOR 18 
C ayes 

6 

COMP 448 

1235 

1670 

1794 

C1 4448 

1110 

DECML lt 
DUMP 18 
DUMP18 le 
FILBLK lt 
LNKBLK 18 
ODT11 18 
ODTLIX 18 
PFTS 4448 
POP 18 
PRINT lt 

2438 

PUSH lt 
REGTST 4448 
SPO! 444% 

1241 

1462 

1723 

1816 
SCOPE 18 
11208 
17708 
21698 

SCOP. it 
SUMP 1s 
SETIT 444g 
TIME 444 
1242 

1463 

1724 

1824 
TRACE 1s 
RNBLK 18 
TSTREG } = 4448 
YPEM 18 
WRITE it 
SCATCH lt 
SCNTAG lt 
C 1s 
| = 18 
SEGQUAT 1s 
T it 
| SKRAT 18 
SLOADR lt 
| SOCTAL 1s 


BUS WINDOW STATIC TEST MACY11 271732) 


OS-OCT-76 10:45 PAGE 80 


83 


ne dt 
he OE a 
Oo 





co 
VO-ov-oo 
se 2t st 


ow 

ao-~ 

st 3 
0.00 








1076% 
1731% 
21378 


ne a te ee 


Ue PL ch BUS WINDOW STATIC TEST MACY11 27(732) O5-0CT-7& 10:45 PAGE 81 


DAAA.P11 CROSS REFERENCE TABLE -- MACRO NAMES 
$SRAND 1a 
SRANDY l# 
AD ‘foe 
SSCOPE le 3708 2253 
$SRAT le 
$SWDOC 1s 3708 374 
STRAP 1% 
$TYPE le 70% 1919 
SURAT 1s 
SCOP 1# 
SCOPE lt 3708 514 548 582 616 650 684 721 761 801 874 947 1004 1048 
1076 1120 1209 1247 1281 1387 1425 1457 1486 1508 1518 1552 1581 1609 1653 
43s Eg: Mae 1343 1832 1861 1874 1882 1892 1964 1992 2023 2059 2081 2109 
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ROSS REFERENCE TABLE -- PERMANENT SYMBOLS 


a 


SNE 
F ? 
} 


ROC 1904 
ROD 480 i389 1404 1418 1419 1452 1465 1471 1id4 1855 1903 1349 192 2323 2358 
2395 ew? ese 8 etbe 
ASL 1397 1338 1435 1436 1469 1470 es8 2373 234% O70 O75 76 %c7e S77 £278 
ASR es3 235 e457 4B 
Joh be 
Ve 
BEG 469 497 See 528 S34 540 S46 SS6 Sée S68 S74 580 590 S96 602 
£98 614 be4 §30 636 é4e 648 6S8 664 670 676 682 692 692 704 
710 716 (Je 741 759 739 772 783 730 733 809 815 821 827 833 
839 B45 851 eS? 863 563 882 S38 894 $09 906 gle $18 924 939 
$36 S4e 963 968 977 “982 1000 1015 1025 1035 1045 1056 1062 81068 1074 
1099 1099 1108 1117 1128 1131 1136 1145 11Se 1159 1166 1173 12380 1187 1194 
120i 1207 l2el lee9 1237 1245 1259 1e64 1274 1279 23s 1310 1320 1332 1347 
1384 1386 1373 1378 1385 1410 1416 7 0 SS7G—sCL 1503 1$33 1560 1566 1572 
i$78 iS83 1595 1601 1607 1623 1632 1641 1650 1665 1672 1679 1686 1693 1700 
1707 1714 i7el 1728 1741 1749 1757 1765 1780 1786 7 1828 1847 1853 1 
1909 1935 1984 2016 2043 2070 2101 e133 «62157 )0=—s e193 eels ss ee7Sis BGC sé 
em Biles G80 cole col «968 case Cele 98 
BIC Ze? 730 736 733 745 748 754 7$7 767 776 779 78S 788 734 
797 965 978s: 1013 1026 1023 1030 1033 1040 1043 8 §=©1085 1088 1094 1 1303 
1106 lile 1115 l4le 1449 1618 1621 1627 1630 1636 1639s 1645 1648 1849 1953 
eess e395 243 
BIce = «1370 
BIS 9$7 971 
8ISB ess3 = « 2S 99 
BIT 468 93C 939 1127 1399 1437 18327 1843 1869 1905 1930 8=—_ 2261 e272 48=6e2S3Ss« 28809 
2527 att 2586 
BLT 2417, a4] e485 2487 
BNE 467 482 991 1400 0s 1421 1438 1454 1480 1498 , §6«ASSSS 154? 1844 6 1931 
1937 «1943 1951 eeee 406 erd ese OSHHHi( (iSOUND (Gi (iC ieSC“‘<i‘ikCCSSAG 
esiS eS3e e587 e601 2603 ec68 2688 
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INC 2309 «4623890 eSle@ 2S S30 
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726 728 729 738 737 738 744 746 747 753 755 756 766 7 769 
775 777 778 784 766 787 793 795 795 806 807 812 813 818 819 
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1039 = i041 1042 61053 1054 10589 1060 1065 1066 1072 1081 1084 1088 1087 1093 
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139 81371 1379 1380 1383 ie 1395 1401 1402 =61403—Ss« 1408 1414 1422 1423 1431 
1433 1439 1440 1441 he ae 1450 1455 1462 1464 1466 1467 1472 1482 1491 
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1719s: 1723 1 1730 1737 1739 3744 1745 1747 1752 1753 1755 1760 1761 1763 
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TSTB. 3 ssdIS34)——s«T9HD ISHS Ss e74 S594 8597 
wait, 1973 2001 2032 20S9 208018 2lMe 21782205282 
"ASciz | 5G28 «2078 «sBlbeSC«BBS2 «2297 -«2313.««2327 «GBS a8 aM CHR «S2u3H HBG. SBE? 
2481 2484 2534 e540 
-BLKW ©2609 
| -ENABL i379 
| [END «2692 
j.ENOC |= 444 SPS S993? 1053 1585 «=: 1667S s«d674=—Ss«eSL)=SssbBBeCCédGSS—CsiL 
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2531 2540 2544 2557 2573 2610 
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| iige 11641697) 1171781183 HBG 1190 ge ©1199 1g09 igs delb 13 
1 1235 1243 1 1251 1254 1257 1269 12972 1281 1285 1288 1300 1305 1937 
1363 1387 1391 1 1425 1429 1433 1452 1457 1461 1468 1484 1486 «61490 )~— 1493 
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MCALL 370 444 514 548 582 616 650 721 761 801 947 =: 1004 = 1048 
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